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姓 は , フラ ミコ ン を に し て , も うど ご どれ ぐら い を ち ま す が や ゲー ムカ セッ ツ ト は , 何 本 ごく 
らい 持つ て いま す が ガ や その ゲー ムカ セツ ト で 遊ぶ こと だ け で , 満足 し て いま すか ゃ 

お 店 で 売ら れ て いる ゲー ムカ セッ ツ ト で 遊ぶ の も , 楽し いこ と で す が , 君 自身 の 手 で , 君 だ 
け の 新しい ゲー を 作 つ て み だ い と 思 つ だ こと は あり ませ ん が ガ 

「 だ つて , ペー シッ は 難し いで し よ !?」 
いい え , そん な 事 は あり ませ ん 。 ご この 「 フタ アミ コン ソフ ノ フト 集 の り 1」 に 載 つ て いる プロ 
プラム を , 打ち 込ん で みて 下さ い 。 

「 ファミ コン は , メモ リー が 少な ぐ て , お も し ろ い ゲー ム な ん が で きつ こない ヨ ノ /」 
本 当 に そう で し よう か が メモ リー が ガ 少 なぐ て も , 君 の 工夫 し だ いで , お も し ろ い ゲー ム は 
だ ぐさ ん 作れ ます 。 「 

この 「 フ ア ニ コン ソラ ト 集 1」 は 。 つ だ 1962 パ イト し かな い フ ァ アミ リー ペー シ 
ッ ク ツク で , ご どれ ぐら い お も し ろ い ゲー ム が 作れ る の が ガ , と いう 事 へ の 私 だ ちの 答え で す 。 と に 
ガ ぐ , まず プロ グラ ム を 打ち 込ん で みて 下さ い 。 そ し て , 「RUN」 と 人 令 し て 下さ い 。 ご 


ん な に いろ いろ な ゲー ム が , こん な に 短い プロ グラ ム で で きる の ガ が , と び つ ぐ くり され る ここ と 
で し よ つ 。 

プロ グラ ム を 入力 し て いる と , きつ と 

「 あれ, ご こ で な ぜ こ ん な お な 事 を し て いる ん だ ろう や 」 
と 思う こと も ある で し よう 。 そ うな れ ば , し め だ も の で す 。 そ れ は , 君 の プロ グラ ム 能 力 が 
上 達し て いる 証拠 だ が ら で す 。 

ファ ミコ ン は , 私 だ ちの 友達 で す 。 ゲー ムカ セッ ツ ト で 遊ぶ だ け で は な ぐ , も つと も つと , 
ファ ミコ ン の 可能 性 を 引き 出し て あげ て 下さ い 。 

「 ファ ミコ ン ソノ ト 集 」 は , ご の 「 め りり 1 」 の あと , 「' め りり 2」'「 の 3」…… と 続き ま 
9 す 。 フ アミ リー ベー シッ グ V@er.3 を 使 つ な 大型 ゲ ー ム も 登場 し て きま す 。 

ゾン ァ デミ リー ペー ラッ ツン 0 人 門 半 ファ リエ て スー シッ ルプ ホッ プ 」「 ステッ) 「 ダ ジャ ンプ 」 
と 共に , ファ ミコ ン と 君 の そば に お いて 下さ い 。 

姓 と , フシ ラミ コン と , 私 だ ちこ と で, 君 の 新しい 可能 性 を 開き まし よう つう 。 


1 898 年 ら 月 
地球 防衛 軍 ス ダ ツ ノー 同 


プロ グラ ム 打 ち 込 み 上 の ご 注意 


人 ダーム ヲ 回 ラム 魚 

FL YFL Y | ファイ ター ララ イィ の 総 攻 疫 ノ ス タ ー シ ッ プ 危う し 8 
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この ソフ ト 集 の 
この ブフ ノ フ 
ブ プログ ラム 打ち 込 入 み 上 の 
2 六 
グロ グラ ムリ スト は 。 ファ ミュ アル 上 で 動作 し て いる も を の を 。 その まま デリ ント アウ ト し た 
も の で す 。 
みな さん も 知っ て いる 通り 。 ファ ミリ ー ベ ベーシック Ver.2 は 。 フリ ー エ リア が 2 キロ 肥 
し か あり ませ ん 。 その だ た め , ゲー ム を 作る の に 非常 に 苦労 し て いま す 。 
本 当 は ベー シッ ク の 命令 は , で きる だ け ス ペー ス (空白 ) を あけ る 方 が 見 や すい の で す が , 
スペ ー ス 一 字 分 で メモ リー も 1 バイト 減っ て し まい ます 。 それ で 
GOTO 27 ダ が 
PRINT “TEST" 
な ど と いう 行 は 
GOTO2 の の 
だ 角 須 ず 生 到 員 下 " 
と いう よう に スペ ー ス を 詰め て いる ブロ グラ ム が あり ます 。 こ うい う ブ ログ ラム の 場合 , リ 
スト 通り に 打ち 込ま な いと 
?70M ERROR 
と いう エラ ー を 起こ し ます 。 これ は , メモ リー が 足り な いと いう 意味 の エラ ー で す 。 
まだ に 
IFA= ニ 1ERA〆 
IFA=1RETURN 
と いう よう 行 が 出 て きま す が 。 こ 暫 は 
IF A= テ 1 THEN ERA ダ 
IF A=1 THEN RETURN 
と いう の が 正しい 閉 式 (ブロ ダラ テム の 書き 旋 ) な の で す が , 実は ファ ミリ ー ベ ペー シッ タ て は 
「 THEN」 を 省略 し て も , 条件 式 の 後 の 命令 を 実行 し て し まう の で す 。 ( 他 の パッ ュ ン で 
は 。 こう は うま くい きま せん ) 
IFA= ニ 10RB= テ 1PRINTA 
と いう よう に AND, OR で 条件 式 を 結ん で も 大 丈夫 で す 。 こ うす る と , プロ グラ ム の 長き 
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が 1 バイ ト 減 る わけ で す 。 ふ つう ,。 人 他 の パソ ュ コン で プロ グラ ム を 作る 時 に は お すす めで きま せ 
ん が , この ソフ ト 集 の プロ グラ ム を 打ち 込む 時 は , リス ト 通 り に し て 下さ い 。 
まだ 、 この 他 に も 
IFMOVE (7) 一 
ん も ルー (5 デミ ) 事 人 me 
と いう よう な 書き 方 を し て いる 所 が , いく つか あり ます 。 
こき は 。 だ ん と えた は 
ルー2・ 昌 ニー (デー ダリ) で て 必 上 AN3 お 
A ル デー2・B 三 (ん えー テー1) !EF 民 INT B 
と それ ぞ どれ ダ オ レ グ 下 て や っ て みて 下さ きい 。 
カッ コ ( ) の 中 が 正しい 時 は 「 一 1」, まち が っ て いる 時 は 「9」 か 「B」 に 代入 きれ 
て いる の が 。 わ か る と 思い ます 。 を それ を 利用 し た 書き 方 で す 。 を し で , 
IF 一 - THEN 
と いう 文型 で は 。 「ーー」 が 正しけれ ば 「THEN」 以 下 の 命 令 を 実行 する わけ で す が , 実 
は 「 ーー 」 の 中 が 正しい と いう 事 は , 「ー」 が 「 一 1」 で ある と いう 事 な の で す 。 そこ で 
IF A THEN 一 - 
と いう 書き 方 を する と , 「A= テ ー1」 の 時 「THEN」 以 下 を 実行 し , そう で な い 時 は 実行 
し な いと いう 意味 な の で す 。 

両方 と も , ブロ グラ ム の 作り 方 と し て は 正しい の で す が , あと で ブロ グラ ム を 見 直す 時 わ 
か り ず らい の で , あ まり お すす めで きま せん が , メ モリ ー の 節約 に は 有効 な 手段 で す 。 

な お , ブロ グラ ムリ スト の プリ ント アッ ウト の 都合 上 , この ソフ ト 集 の プロ グラ ムリ スト で 
は 。 「 ば 」 や 「 ば 」 は 「 は 」「 は “」 と 2 字 分 の スペ ー ス に な っ て いま す が , 「 ば 」「 ば 」 と 
1 字 で 入力 し て 下 & い ぃ い (この 2 字 と 1 字 の 違い に つい て は , 「 フ ァ ミ リー ベー シッ ク ジャ 
ング 」 編 で 説明 し た いと 思い ます )》 

プログ ラム の 入力 (打ち 込み 方 ) や 修整 の や り 5 方 に つい て は , 「 フ ァ ミ リー ペー シッ ク 
ホッ プ 」 を 参照 し て 下さ い 。 


人 間 が 生存 可能 な 環境 を 持つ 小惑星 “S3612-09"。 平和 を うに 見 えた この 世界 に 思い が け な 
い 危 険 が 隠れ て いた 。 地球 か ら の 調査 隊 が 地球 の ハエ に 似 た 生物 「 フ ァ イ タ ー フ ライ 」 の 攻 
撃 を 受け て いる らし い 。 調査 隊 を 救い , 基地 を 作る た め の 増 援 し と し て , 地球 か が ら 「 ス ター シ 
ッ プ 」 が 発進 し た 。 と ころ が 小惑星 が 近づい た だ 時 , ファ イタ ー フ ライ の 攻撃 を 受け て し まっ 
だ た 。 プン ブン 飛ん で 来 て 体 当 り を か け て くる と は …。 ファイター フラ イ が ぶつ か る た だ たび に 「 ス 
ター シッ プ 」 の 燃料 が 減っ て いく 。 こ の まま で は , 着陸 に 必要 な 燃料 まで 失っ て し まう …… 
オォ オッ, あれ は 小惑星 か ら う ち 出 し て くれ た 燃料 ユニ ッ ト だ 。 やれやれ 。 

うわ っ , 限 石 だ アク あん な の に ぶつ か っ た ら お し まい だ ……・。 


文 遊 び 亡 


プ ブログ ラム を RUN させ る と 
PUSH START BUTTON 
と 表示 が 出 ま すか ら ,。 コン トロ ー ラ ー1I の START ボタ ン を 押し て くだ さい 。 
ゲー ム が 始ま る と 「 ス ター シッ プ 」 が 表示 る れ ま す 。 こ れ を コ ユ コントロー ラー 1 の 十字 ボタ 
ン で て 左右 に 動か し ます 。 宇宙 空 間 で すか ら , 動く 《 く だ た め に は 移動 用 の ロケ ッ ト エ ンジ ン を 使い 
ます 。 こ れ を 1 回 使う と (キー を 1 回 押す と ), FUEL が 1 減り ます 。 さ る ら に 一 度 動く と , 逆 
6 ファ ミコ ン ソ フト 集 001 


プロ グラ ムリ スト (Be 画面 デー ター は 95 ペ ー ジ ) 


1 の の CLB』CBEN2』 CBSET1』 BPRITEON』 VIEM 
11 の PALET 8 2,47。4 日 21 。1 昌 

12 の PALET さ 。47。4 日 。 さ 9。22 

1 DEFSPRITE の 』( の 。1 の 。 の の) = リヒ "フッ へ 5 ボリ 

14 の 9 DEFBPRITE1 。(。 1 の, の 。 の ) mCHR も (1 の) +DHR (1 日 1 ) +CHR 
も (1 コ 2) +CHR$(1 昌 さ ) 

15 の FL=1 の 』GP=2 の の 』FT= ロ の 』 NT=1 ロ の 

さ の 9 LUCATEg 。19』PRINT "PUSBH START BUTTDN!" 

さ 1 IF BTRIB( の ) く >1BDTO さ 1 の 

さ 2 の ら じ = の 』 BH=2』 Bm25 の の 

4 の V= の 』FU= さ の の 』 CX=12 昌 VIEM | 

41 の GUBUB さ の の の 』 BUDBUB さ 1 の の 9』 BDBUB さ 2 の の 』 BUBUB さ さ の の 』 BPRTI TE 


4Z の 9 FOURIT= の TOSPFOUSITIUNT。 の の:iNEXTIPOUBITIUN6 , 2255 255 


29 IF STRIG( の ) =BGOUSUB 1 の 

19 S=STICK( の )』 IF FU= の GOTOS40 の 

ら 2 の IF G=1 THEN VsV+2aFUmFU-1 1 GOUTOB4 の 

この IF =2 THEN ソ V= ソ ー2」FUmFU-1 

5 ら 4 の CX=CX+V』 GUSUB さ 2 の の 

らら 9 IF じ X く 16 THEN CXm16 

りら 6 の IF CX>144 THEN CX=144 

りり 7 の BPRITEOU し LX 126 

り B の IF XFPOUS(6) ぐ 255 AND MVUE(6)= ウ の THEN ERA6s POBITIO 
N6 。 29 59 

ロワ の FUR Img TU 5 

6 の の IF ABS(XPUS( エ T) 一 CX) く 16 AND ABS(YPOB( T ) -12 の ) く 16 
BUSUB25 の 0 の 

FLYFLY 9 


方 向 に エン ジン を 噴射 し な い 限 り , いつ まで も 止ま り ま せん 。 し だ が っ て , あま り 激 し く 動 
く 〈 く と す で 燃 料 が な く な っ て し まい , 姿勢 制御 が 不可 能 に な っ て し まい ます 。 
敵 を 攻撃 する た め に は , コン トロ ー ラ ー の A ボタ ン を 押す と タマ を 発射 で きま す 。 


文男 面 に 現われ る キャ ラク ター 


@ フ ァ イ タ ー フ ライ 
画面 の 上 か ら 5 下 へ , まっ すぐ 飛 ん で きま す 。 ス ター シッ プ に ぶつ か る と FUEL が 10 減 り ま 
す 。 撃ち お と す と 10 点 で す 。 


@ ニ タニ タ 
画面 の 右上 か ら 左 端 ま で , 横 に 移動 し ます 。 敵 の 偵察 部 隊 で , 撃つ と 10 一 100 点 で す 。 
の スピ ナー 


味方 の 燃料 ユニ ッ ト で , 回 収 す る (ぶつ か れ ば いい ) と FUEL が 50 増 えま す 。 
谷 ファ イア ー ボ ー ル 

了 石 で , 画面 下 か ら 上 ^ へ 移動 し ます 。 こ れ に ぶつ か る と スタ ー シ ッ プ は , や られ て し まい 
ます 。 破壊 で きま せん 。 

スタ ー シ ッ プ は 3 隻 , 燃料 は 300 で す 。 得点 2500 点 ご と に スタ ー シ ッ プ が 1 隻 増 えま す 。 
文 ブ ログ ラム の 説明 

100-- 初期 設定 

500-- メイ ン ル ー チ ン 

1000-- タマ 発射 

2000-- 各 キ ャ ラク ター 出現 , 移動 

2500-- 衝突 処理 

3000-- 得点 , FUEL な どの 表示 

3500-- GAME OVER 

が テ o は 。 拓 き まく 分 ける と 上 の よう に な り ま す 。 メ イオ シア ルー チッ で 。 キー 入力 , え 
ター シッ プ の 移動 , 衝突 判定 を 行なっ て いま す 。 キ ー 人 入力 を 調べ (510 行 ), それ に よっ て を 
の 回 の 移動 量 を 決め (520-530 行 )、 スタ ー シ ッ プ を 移動 きせ ます (570 行 )。 

揺 回 の 移動 量 は 変数 V に 入っ て いま すか ら , 移動 を 遅く (反応 を に ぶ く ) し た だ い 時 は 540 行 の , 

CX テ CX 十 V 

の V を , 適当 な 数 で 割っ て や り ま す 。 

衝突 の 判定 は 座標 の 比較 で 行ない , 衝突 が 起こ っ た 時 は 2500 行 か ら の サブ ルー チン に 飛び , 
ここ て 衝突 し た 物 の 種類 に 応じ た 処理 を 行ない ます 。 
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61 の IF XPOS(I)-6<XPDS(6) AND XPOB(I)+14>XPOB(6) AN 
D YP0S(1) -B<YPOB(6) ND YPOS(T)+16>YPHB(6) BOSUB15 
の 

62 の IF XPDS(1)= BUSUB2 の の 』 GODTD64 の 

6 さ 3 の IF NOT MOVE(I) THEN ERAI』PHBITIDNI , の , の 

64g NEXT』GDTD5 の の 

1 の 9 の の IF MOVE(6) THEN RETURN 

1 の 1 の DEFHDVE(6) =SPRITE(12』1 1 1 の, の) PUBITI ロ N6 CX 
+4。112 | 

1929 MOVE6』 RETURN 

159 の 9 IF I> さ THEN RETURN 

151 の 9 IF I> の BUTD15 さ の 

152 の J=RND(6) *1g+5 の LODCATE19。14』PRINTJI" "BCm(BD+ 
りー-19) MDD さ 276@ 

15 さ の ERAI。6kPDBITIODNT 。9。9iFOSITITON6 , 255 。 2 

154 の SD=(SC+19) MDD さ 2769』 BUBUB さ gg 

155g IF SC>mEB THEN SBHmBH+11 GDBSUB さ さ の の 』 Bm (B+25 の の ) MOD 
さっ 5 の の 

156 の 9 RETURN 

2 の 9 の DNI+1BUTU2 1 の 。2 の 1 の 。2 の 1 の 。 2 の 1 の,24 の 。297 の 

_ 2 の 91 の IFRND(FL) > の THEN RETURN 

、 292 の DEFMOVE(1 ) =BPRITE(2 5 1 BB,9,2) 』FDBTTIDNI 。RND 
(129) +14 。24 

、 23 の MDVETIiRETURN 

2 の 4 IFRND(BP) > の THEN RETURN 

、 25 の DEFMDVE(1 ) smBPRITE(7 5。 さ 。BB』9,1) 』PDSITIUNI 。RND 
(128)+16,』24 

、 2969 MDVET』RETURN 

_ 297 IFRND(FI) > の THEN RETURN 
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ある キャ ラク ター が 移動 し て いな い (画面 に 現われ て いな い ) 場合 に は 2000 行 に 飛ん で , 乱 
数 で 出現 を 決定 し ます 。 出 現 の 確率 は 各 キ ャ ラク ター に よっ て 異な り , それ ぞ れ の 変数 に し 
まわ れ て いま す ( 変 数 表 参 照 )。 処理 の 開始 行 ファ イタ ー フ ライ (2010 行 ), スピ ナー(2040 
行 )、 ファ イア 一 ボー ル (2070 行 ), ニタ ニタ (2100 行 ) で す 。 

撃っ だ タマ が 何 か に 当っ た だ 時 は 1500 行 に 飛び , 対象 が ファ イタ ー フ ライ か ニタ ニタ な ら , を 
の キャ ラク ター を 消し , 得点 を 加算 し ます 。 ニ タニ タ の 場合 は 得点 は 乱数 で 決め ます (1520 行 )。 
文 プ ログ ラム の 改造 

この ゲー ム の 場合 , 改造 と いっ て も 変数 の 値 を 変え る くら い だ と 思い ます 。 ゲ ー ム バラ ン 
ス を 〈《 す ずる な いよ うに 修正 で きる の は , 次 の 2 つ で し ょ 2。 
① スター シッ プ の 数 320 行 SH 
② キャ ラク ター の 出現 度数 150 行 変数 表 参 照 

まだ , スタ ー シ ッ プ グ 以 外 の 移動 スピ ー ド は , 各 ス プラ イト の DEF MOVE 文 を 変え れ ば い 
いで し ょ う ( 表 参 照 )。 


文 用 数 表 


CX スタ ー シ ッ プ の xX 座標 

V スタ ー シ ッ プ の 移動 量 
SH スタ ー シ ッ プ の 数 

FL ファ イタ ー フ ライ 出現 度数 
SP スピ ナー 出現 度数 


値 が 小さ い 程 , 現われ や すく な る 。 
FI "ファイ アー ボー ル 出 現 度数 | ee 


NI ニタ ニタ 出現 度数 

SC スコ ア 

HS 。 ハイ スコ ア 

FU 残り 燃料 
スプ ライ ト 番 号 定義 し て いる 行 
0 ニタ ニタ 2110 行 

1 ナナ イー プティ ォ 2020 行 

4 スピ ナー 2050 行 

語 - プ アオ ナー ポール 2080 行 
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L 


LH 
1 ト 
| 


DEFHIHVE(T)mBFRITE(B. 12. 日 りこ) IFHUBITJUNI し じ /。 


MOVE I 』 RETURN 
IF RND(NI) *@ THEN RETURN 
DEFMOVE (1 ) =SFRITE(11』7。2 64』9。 さ ) POUSITIONI 。14 


MOVE { 』 RETURN 
DNI+1BOTO2519』251 の 9。2 ロ 1 の 251 の 。252 。 5 さ の 
FU=FU-1 の 1F FU< ウ THEN FU= の 

BODSUB さ 2 の RETURN 

FU=FU+5 の 』 ERAT iPDSITIDNT 。 の 。 の 』 BUSBUBS2S の 』 RETURN 
ERAB。1 2 さ 。4。5kBPRITEI SBPRITE1 。CX 。 129』 BH=GH-1 


POUSITIUNS。 9,9:FURJ=2TU77 ワ 9 NEXT 
IF SH= THEN _ RETURN さら の の 
RETURN4 の の 
LUCATE19.6uPRINTB じ DIRETURN 
LUCATE179.2ZuPRINTHSIRETURN 
LUUITE1 サ 794JJFRIVIFUI 、 REIURR 
LULATIE2 り .17JPRKINTSHI JREIURN 
LUCATES コ ュ PRINT' BANE UVUER 

IF 5 じ 2HB THEN HG=SC: BUSUBS く 100 
GO0TO03 の の 
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宇宙 空間 で の ファ イタ ー フ ライ の 攻撃 も か わし て , いよ いよ 小惑星 が 近づい て きた だ た 。 だ が , 
ファ イタ ー フ ライ と の 戦い で 自動 着陸 装置 を は じ め , いく つか の シス テム が 壊れ て し まっ た 。 
し た が っ て 小惑星 へ の 着陸 は マニ ュ ア ル (手動 操縦 ) で 行なわ な けれ ば な ら な い 。 し か る も 最 
初子 定 し て いた 着陸 地点 まで は , 自動 装置 な し で は 行き つけ を そう も な い 。 手近 な 所 で 比較 的 
安全 な 地点 を 探る なけれ ば …。 

ょ し , あの 辺 に 降り ょ う 。 多少 危険 は 残り を うだ が , この 際 し か だ た が な い 。 何 カ 所 か 平 6 
な 男 囲 も あり そう だ 。 

し か し , 燃料 が も う 残 0 り 少な て な っ て いる か ら , 進入 の や り 直 し は で きそう も な い 。 こ 2 
な っ た ら 一 発 勝負 に 賭け る し か な る そう だ / 


文 ゲ ー ム の 説明 
昔 、 ゲーム セン ター に あっ た 宇宙 船 の 着陸 ゲ 一 ム の ファ ミコ ン 版 で す 。 
プロ グラ ム を 走ら せる と 
PUSH START BUTTON/ 
の 表示 が 出 ま すか ら , コン トロ ー ラ ー の スタ ー ト ボタ ン を 押し て くだ さい 。 
ゲー ム が 始ま る と , 画面 に 小惑星 の 地表 の 様子 が 出 ま す 。 中 に 4 カ所 日 い 部 分 が あり ます 
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72 


プロ グラ ハリ スト (BG 画 面 デ ー タ ー は 96 ペ ー ジ ) 


1 の CLBICBSET 1。』1』BPRITEDN 

11 の 9 DEFSPRITE の 』( の 。 1 。 の 9。 の 9) = テト NE" 

12 の DEFBPFRITE1 。 (1 。 の 。 の 9) mi の YY ホ " YY" 

1 さ の DEFSPRITE2。( の 。 1 の, の の) m リ ES つ 5 へ ホ 1 

14 の DEFBPRITE さ 。 (の 。 1 。 の 。1 。9) = リバ "フリ "ホリ 

15 の 9 DEFSPRITE4 』(9。1 の 』1 の) = リト "テヒ YY" ! 

1555 DEFSPRI TE 」( さ 。 の 。 の 。 の の) msCHR も (21 さ ) 

156 DEFSPRITE6。( さ 。 1 。 の 9, の の, の) msCHR 還 (176) +CHR*(177) +CHR 
(17 日 ) TCHR(179) 

157 DEFBPRITE7 。( さ 。 1 。 の 。 の , の ) =CHR ま (1 の ) +CHR(1 日 1 ) +CHR 
(1 昌 2) +CHR ま (1 日 さ ) 

169 DIMFX(4) 。FY(4) 。L8(4) 

179 FOURI=2TO4』READFX(1) 。FY(1I) 。L8(I) INEXT 

18 の DATA15。4。2 の 9 12。12。211 4。16。21 さ ュー さ 。12。211 。-6。4 
。 2 の 

2 の の PALET HB の ,47。4 昌 。4 昌 。4B』VIEM 

21 の BCD= の 』Z=2』Vs の ikF=1 の の の 

22 の LUCATE 号 。 品 』PRINT "FUSH BTART BUTTDN! !" 

2 さ の IF BTRIB( の ) く <>1 BTOD 2 さ 30 

24 の VIEM 

5 の の HD=2』VX= り 』 り Y= り 』 り = り +2 ョ Xm6 の ZIYm24XZ 

19 FL=F』 IFF >55 の THENF=Fー 呈 の 

55 の LUCATE 1 の 。22PRINT "BCOREm "BC 

1 の 29 LOUCATE の 。21sPRINT"XmUIVXNU YsmUmaVYi" FUELs"IFLI 
1 の 1 の K=STICK (の) : IFFL= の DRK= の ORK 2THEN1 の 5 の 

1 の 915 SGPRITEHD 

1929 IFK=1THENHD=HD+1』 IFHD>4THENHD=4 
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が , これ が 着陸 可能 な 範 胃 で す 。 を その 下 に ,X 1,X 2,X5 と ある の は , 着陸 地点 の 難易 度 に 
よる 一 チ ス て イ す 。 

同時 に , 画面 左上 に スタ ー シ ッ プ が 表示 る され ます の で , コン トロ ー ラ ー で うま くく 姿勢 制御 
を 行ない , 上 手 に 着陸 地点 まで 誘導 し て くだ さる い 。 着陸 地点 以外 の 所 に 接触 する と , スタ ー 
アッ プ は 爆発 し て し まっ て ゲー ムキ オー パー に な っ て し まい ます 。 

ス . タ ー シ ッ プ の 誘導 の た め に , 姿勢 制御 ロケット 噴射 を 使い ます 。 姿勢 制御 の た め に は , 
コン トロ ー ラ ー の 十字 ボタ ン を 使い 。 スタ ー シ ッ プ の 向き を 変え ます 。 一 回 の 姿勢 変更 は 燃 
料 を 5 ユニ ッ ト 消 費 し ます 。 ま だ , コン トロ ー ラ ー の A ボタ ン を 押す と ロケ ッ ト が 噴射 き 
れ , これ は スピ ー ド の 調整 に 使い ます 。 一 回 の 噴射 で 燃料 を 10 ユ ニッ ト 消 費 し ます 。 

速度 は 画面 の 左下 に 表示 る れ ま す 。X が 横 方 向 の スピ ー ド で , 右向き が 十 で す 。Y は 垂直 
方 向 の スピ ー ド で , 下向き が 十 で す 。 何 もし な いと , 1 単位 時 間 に Y 方 向 の スピ ー ド が 十 1 
る され ます 。 ロ ケッ ト を 噴射 する と , 1 単位 時 間 あ た り Y 方 向 の スピ ー ド が 一 2 る され ます 。 ス 
ター シッ プ が 斜め の 時 に ロケ ッ ト を 使う と , 駐 , Y 方 向 共 に スピ ー ド が 1 ずつ 変化 し ます 。 

着陸 の た め の 条 件 は , X 方 向 の スピ ー ド の 絶対 値 が 2 以下 , Y 方 向 が 5 以下 で あり , か つ 
スタ ー シ ッ プ が まっ す で 上 を 向い て いる こと で , これ 以外 の 場合 は 爆発 し て し まい ます 。 

着陸 に 成功 する と, 着陸 点 の 倍数 に , 残り の 燃料 を わか けた だ け の 得点 が 加算 きれ, スタ ー 
ト ボ タン を 押す と 次 の パタ ー ン に 進み ます 。 1 面 進む ご と に , 燃料 か 550 ユ ニッ ト ず っ つ 減 6 
され ま す 。 ま た だ た, スタ ー シ ッ プ が 最初 か 6 XX, Y 方 向 に スピ ー ド を 持っ た 状態 か ら 始 まり , 
だ ん だ ん 困難 に な っ て いき ます 。 

O mm 呈 和 
克 ブ ログ ラム の 説明 
念 初期 設定 (100 一 550) 

スプ ライ ト の 定義 , パレ ッ ト の セッ ト , 変数 の 初期 化 , 画面 の 設定 を 行ない ます 。 
念 光 勢 制御 (1000 一 1050) 

キー 入力 を チェ ッ ク し て , スター シッ プ グ の 姿勢 の 変更 ぎし ます 。 ス ター シッ プ の 向き は 変 
数 DD に セッ ト る れ て いま す 。 

@ ス ピー ド 変 更 (1060 一 1140) 

ボタ ン A が 押さ れ て いれ ば , スタ ー シ ッ プ の 向き に 応じ た スピ ー ド の 変更 を 行ない ます 。 
人 @ 座 標 チ ェ ッ ク (1150-1300) 

新しい 座標 を 計算 し て , その 座標 の BG 面 に 書か れ て いる 物 を 調べ で べ 。 コ ー ド を C に セッ ト 
し ます 。 C の 各種 類 に 応じ た 処理 に 飛び ます 。 

@ 着 陸 処 理 (2000-2040) 

看 陸 の た め の 条 件 を チェ ッ ク し て , 満た し て いれ ば 着陸 成功 で す 。 残 0 燃料 を 得点 に 加算 
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39 rFK=2THENHD=| =HD- 1: TFHD<gTHENHD=9 
FL=FL- 呈 ーー 
、 5 DEFBPRITE5,( さ 。 の 。 0 (HDes) 。0) =CHRW(LB く HD) 
5 の 9 SPRITEHD ,X/Z 。Y/Z 
) 8= BTRTB(@) iVYmVY+1 
IFS<>BTHEN115g 
BPRTITE 旨 。X/Z+FX(HD) 。Y/Z+FY(HD) 』FL=FL-1 の 
NHD+1BUTO11 の 9 。111 の 9。112 の 9。11 さ の 。114 の 
VX=VX- さ 』GDTD1 1 王 の 
VX=VXー1 』 VY=VY-1』BOTO 115 の 
_VY=VY- さ 』 BOTOD 1155 の 
VX=VX+1』 VYmVY-1』GBHTD 1159 
VX= り X+ さ 
X=X+VX』Y=Y+TVY』 ITF Y/Z<24THENY=24%Z 
BX=(X/Zー16) /Bi BYs(Y/Z-24 ) / 晶 
CmQASCD (BCR$(BX 。BY) ) 
IF NOT (Cs さ 2 OR C=2O 昌 HR Cm2O6) THEN 2 ロロ の 
C=ABC (BDPR も (BX+1 。 BY ) ) 
IF NHT (Cm さ 2 UR Cm209 OR Cm2 の 6) THEN 25 の の 
CmABC(BCR$ (HBX 。BY+1 ) ) 
TTF NDT(CmS2 DR Cm25 HR Cm2O6) THEN 250 の 
CsQBCD (BPR (BX+1 。BY+1 ) ) 
IFNUT (Cs さ 2URCs29BDRC=2 の 6) THEN25 の の 
C=QGSC (BCR ま (BX 。BY+2) ) 
IF C>2552THEN2OO の 
C=ABC (BPR (BX+1 。BY+2) ) 
IFC>22THEN2OO の 
SPR ITE 昌 』 BUTD1 9 の の 
TFABB(VX ) >2HRABB (VY) 5 DRHD く 22THEN255g の 
BC=BC-((C=25 さ )+ (Ds254) *2+ (Cm255) *5) kFL 
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し ます 。 
ゲー ム オ ー バ ー (2500 一 2540) 

スプ ライ ト を 消し ます 。 

』 た ー * 

文 ブ ログ ラム の 改造 

燃料 を 増やし た い 人 は 210 行 の ドニ 1000 を 変え て くだ さい 。 同じ 210 行 の Z 2 を 適当 に 
大 きく し て や る と スタ ー シ ッ プ は 反応 が 鈍く な り ま す 。 

地形 を 変え た たい 人 は , 自分 で BG 画面 を 作っ て 《 だ さる い 。 だ だ し この 時 , 着陸 地点 は 次 の キ 


ャ ラク ター を 使い ます 。 
XX ユー ニー ド IM D。、 メメ ーー も バラ 5ー つ JI 7 


文 愛 数 表 


X。 Y スタ ー シ ッ プ 座 標 

VX, VY スタ ー シ ッ プ の スピ ー ド 
HD スタ ー シ ッ プ の 向き 
FL 燃料 

V スタ ー シ ッ プ の 初期 速度 
SC 得点 


に 
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ee 
GS 


LOCATE 。2 さ 』PRINT リ チ ャ ウ リフ セイ コウ 。 "1 
IFBTRIG( の ) “>1THEN2 ミ 
LOUCATEg,2 さ IPRINT" り 』sBHTD 5 の の 
SPRITEHD』 BPR1 TE 
1 の FORI=TD4』SPRITE6。X/Z』。Y/Z』FURJ= の TUDZ99』NEXT 
2 の BPRITE6』SPRITE7。X/Z 。Y/Z』FURJm の TU5B の の INEXTi BPRT 
TE7』NEXT 
25 さ の LUCATE1 の 9。BiPRINT "BAME OVER" 
2549 BOTD 21 の 


ee 
むむ 
Q 


hk ト J hh) は 
le 
を オ ま J) 
CS 


LH 
て 
Cy 


が 
が 
M 
aa 
0 
0 
4 
6 
の 
和 


ーー 
チャ の リク ビビ イコ ウェ 
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スタ ー シ ッ プ は , 無事 に 小惑星 “S3612-09" に 着陸 で きだ た 。 だ が , 着陸 地点 は , 調査 隊 の 
位置 か ら 6 少し 離れ て いる 。 る っ を そく 救援 に 向 か な うと し だ 時 , 着陸 地点 の 上 空 に 黒い 点 が ポ 
ツ ポ ッ と 現われ だ 。 ま る か …,。 や っ ぱり ファ イタ ー フ ライ だ 。 何 て し つこ い ハ エ 達 な ん だ 

し か も 奴ら め , 我々 が 無事 着陸 し た の を 見 て , 捨て 身 で 攻撃 し て 来 だ た 。 何 と , 奴ら が 浴 ち 
た 所 は , 地面 に 大 究 が あい て し まう で は な いか 。 あ ん な の に 体 当り され だ た ら , いく ら な ん で 
も たまら な い 。 落ち る 前 に 撃た が なく て は … 

し か し 攻撃 用 に エネ ルギー を 使う わけ に は いか な い の で , 古典 的 な タマ で 攻撃 し な く て は 
な ら な い 。 タ マ に は 限り が ある が , さい わい 敵 か 味方 か よく わか ら な い が , カラ ス の よう な 
奴 が 補給 用 の タマ を 沙 と し て い 〈《。 あれ を 拾い な が 6 戦う し か な る そう だ 。 や れ や れ ……・。 
文 ゲ ー ム の 説明 

次 々 と 降っ て くる ファ イタ ダー フラ イ を 撃ち 落と し て 《 だ る さい 。 ス ター シッ プ は ユン トロ ー 
テー て 動か し ます 。 

プロ グラ ム を 走ら せる と , 例 に よっ て , 

PUSH START BUTTON/ 
が 表示 る れ ま すか 56, コン トロ ー ラ ーT エ の スタ ー ト ボタ ン を 押し て ゲー ム を 始め ます 。 
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ブ プログ ラム 、 リ スト (BeG 画 面 デ テー ター は 97 ペ ー ジ ) 


1 の の CLS』CBEN2I CBSET1 3 GPRITEON 
11 の 9 PALET 8 1。47。4B。21 。1 日 
129 PALET B 2。4,4 昌 。 さ 日 。1 昌 
13 の PALET 8 さ 。47。4B。4 日 。4 
14 の 9 DEFBPRITE の 。 (の 1 の 。 の 。 の ) = リヒ 9 つ 5 へ 5 ホ " 
15 の 9 DEFSPRITE1 。(。 1 。 の , の の ) =CHR も (1 の ) +PHR (1 日 1 ) +CHR 
ま (1B2) +CHR ま (1 日 さ ) 
29 の LUCATE 呈 。B』FRINT "PUBH BTART BUTTON!" 
21 の IF BTRIB( の )<>1 BHTD210 
22 の BC= の 』 GH= マ 
さ の の M=1 の 』CX=14』QX=ー1 : = の 
さ の 92 VIEM GDBUB69 の の gi BUBUB6 1 の: BHBUB62 の の 』 BHSBUB6 さ の の 
さ 1 の SGPRITE,CXx 日 +16,16BI SFPRITE1 
さ 2 の PDBITIDN5 。 の, の 
9 の IFGTRIG (の) =BBUBUB 1 の の の 
1 の 8B=SBTICK() 』 XsCXー(Bm1)+ (Bm2) 』 TIFB= ウ GBDTO55 の 
2 IFX<THENX = の 
さ の IFX>26THENX=26 


49 IFSBDR* も (Xー(Bm1) 。29) く >0 リ THENDXmX』BFRTITE。CX 日 +1 
6。16 日 
55 の IFC>gAND(CX=AX DR CX+1mQX) BUBUB2 ロ OO 


1FC> の THEN じ = ェ ビー1 : TFCmTHENLUCATEAX。19jFRINT" " ョ 6 


円 
才 
L 


らら 6 IFYFUS (5) =1766OSUR45 の 

りら 6 の IF CE RND_ MOVE (SO) = の AND_ MOVE(4) 人 aND_ XFOS【(4) く 朋 
X# 日 +16THENMOUVES 

ウノ の XECXXB+16s FOURS= テ TO エ = ら 9 

りつ の IFRBS(XPOS( エ )ーX) く 16RNDYFOUS(T) >15S2THENS=4』 NEXTi 
GUTD3 の の の 


スタ ー シ ッ プ は , コン トロ ー ラ ー の 十字 ボタ ン で 左右 に 動か し ます 。 こ の 時 , 動け る の は 
地面 の 上 どけ で す 。 まだ, ファ イタ ー フ ライ が 落ち て で きた 容 は 越え を られ ませ ん 。 

タマ の 発射 は , コン トロ ー ラ ー の A ボタ ン で す 。 最 初 は 。 タマ が 10 発 し か あり ませ ん 。 残 
り の タマ 数 は 画面 の 左下 に 表示 る れ て いま すか ら , 慎重 に 狙っ て くだ さい 。 

10 発 撃っ た ら 終 わり で は あん まり で すか ら , タマ の 補給 が あり ます 。 画面 の 上 の 方 を カラ 
ス (ニッ トピ ッ カ ー) が 飛ん で いく 途中 で , タマ を 投下 し て いき ます 。 こ の タマ は 地上 に つ 
いて , そこ に 地面 が あれ ば “@” が 表示 る れ ま す 。 こ れ を スタ ー シ ッ プ で 回 収 (を こ へ 行く 
だ けけ で よい ) する と ,。 タマ が 10 発 増え ます 。 だ た だ し スタ ー ジ シッ プ は 20 発 まで し か タマ を 持て 
ませ ん か 6。 オー バー し た 分 は 捨て られ て し まい ます 。@ は し ば 6 くす る と 消え て し まい ま 
すか ら , 素早 く 拾 っ て くだ きい 。 

ファ イタ ー フ ライ は 1 匹 10 点 で , 500 点 ご と に スタ ー シ ッ プ が 1 機 増 えま す 。 

文 プ ログ ラム の 説明 
念 初 期 設 定 (100 一 320) 

スタ ー シ ッ プ と 爆発 用 の スプ ライ ト の 定義 , パレ ッ ト の 色 セ モット, 変数 の 初期 モ セット な ど 
を 行ない , 画面 の 表示 を 行ない ます 。 

@ ス ター シッ プ 移 動 (500 て 540) 

キー 入力 を チェ ッ ク し て , A ボタ ン が 押 き る きれ て いれ ば タマ 発射 の 処理 (1000 行 一 ) へ , 十 
字 ボ タン な ら 左 右 の 移動 を 行ない ます 。 
ファ イタ ー フ ライ 処理 (570 一 620) 

ス ダ メー シッ プ の 位置 【 ス デラ イト 庫 標 ) を 変数 えん に セッ ト し て 。 ファ イダ ター フラ イヒ と の 位 
中 を 比較 し て , 衝突 し て いる か を 調べ ます 。 衝突 し て いれ ば を その 処理 (3000 行 ) に 飛び ます 。 
同様 に し て タマ が ファ イタ ー フ ライ に 当っ た か を 調べ て , 当っ て いれ ば 3500 行 か ら の 処理 を 
呼び ます 。 フ ァ イ タ ー フ ライ が 地面 に 着い て いた ら 究 掘り 処理 (4000 行 ), 表示 る れ て いな け 
れ ば 発生 処理 (5000 行 ) を 呼び ます 。 以 上 を 4 回 (4 匹 ) くり 返し ます 。 

人 @ 補 給 発 生 処 理 (650-670) 

すでに 発生 し て いな けれ ば , 1/50 の 確率 で タマ の 補給 が 生じ ます 。 タ マ の 投下 位置 は 乱数 
で 決め , 変数 AX に セッ ト し て お きま す 。 

@ タ マ 発 射 処理 (1000 一 1010) 

タマ を 発射 済み か , 残り の タマ が な い 場 合 は 何 も し な いで 戻り ます 。 を そう で な けれ ば , タ 
マ を 撃ち ます 。 

人 で 補給 獲得 (2000-2010) 
残り の タマ 数 を 10 発 増やし ます 。20 発 を 越え だ た 分 は 加算 る れ ま せん 。 


メ 2 ファ メ コシ ッッ マト 全 801 


5B5 IF NDT MOVE(6) BOTO6 の の 
59 の IF XPDS(1)-6XXPDGS(6) aND XPOB(T)+14*XFHB(6) AN 
D YFDS(I)+14>YFUG(6) QND YPDS(1)-6<YPDB(6) BOBUB さ 5 
の 

6 の IF YPDS(1)=16BBDSUEB4 の の の 

61 の IF NOT MOVE(1) GUSUBB の の 

62 の 9 NEXT 

63 さ の IF NOT MDVE(6) THENERA6』 FOBITION6 。255 。 
64 の IF XPOUSB(4)=16THENERA4』POBTITIUN4 25 。 の 
655 ロ IF AX> OR RND(5) * の GOUTD5 の 

66 の DEFMDVE(4) smBPRITE(1 昌 。7。2。19B。 の 。 の ) 

662 AX=mRND(2B) 』PDBITIDN4 。 2 さ 2。24』MOVE4 

665 DEFMDVE ( 呈 ) =SBPRITE(12 日 。1 6 日 。, さ ) 

67 の の PUSBITIUN5。AXx 昌 +16』4』 BUTDB の 

1 の の の IFMOVE(6) DRM=THENRETURN 

1 の の 5 DEFMDVE(6) =BPRITE(12。1 。1 。64 の, の ) 
1 の 1 の PUBITIUN6,CX 日 +2 。 1 6 の 』 MUVE6』 =Mー1』 BUSBUB6 の の の 』R 
ETURN 

2 の の MsM+1 の 9』 ITFM>2THENM=2 の 

29 の 5 LUCATEAX , 19』FRINT" " 

2 の 1 の BOBUB6 の の の 』 AXmー1: じ = の RETURN 

さ の の ERAIISFRITE:GFRITE1 CX 日 +16。168』 SBHmBH-1』 PODB1 
TIONI , の , の 

さ の 1 の FURJ= の TU999』 NEXTIERAP。 1 2 。 さ 。4。 昌 。6 

さ の 2 の IFSH=GBOT ロ 1 の の の 

ささ の BDTD ミ の の 

さ 5 の の ERAT。6nFDSITIDNT , の , の :FODBTTTUN6 。255 晶 2555 ェ BC=BC+ 
1 の 9』 BUSUB61 の の 

51 の IF(BC MDD5 の の) =THENBHmBH+ 1 5 GUBUB6 さ の の 

さ 52 RETURN 


の ww 
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@ フ ァ イ タ ー フ ライ と スタ ー シ ッ プ の 衝突 (3000<3030) 

類 発 の 表示 を 行ない し. ス ター シッ プ を 1 機 減ら し ます 。 残り が 0 な ら 6 ゲー ム オ ー バ ー で す 。 
@ タ マ 命 中 (3500 一 3520) 

香 点 に 10 点 加え ます 。500 点 に つき スタ ー シ ッ プ 1 機 が ボー ナス と し て 増え ます 。 
人 @ 入 掘り 処理 (4000 一 4020) 

ファ イタ ー フ ライ が 沙 ち た 所 に , 穴 を あけ ます 。 そこ に 補給 の タマ が あっ た 場合 は , それ 
は クリ ア さ る され て し まい ます 。 
の ファ イタ ー フ ライ 発生 (5000--5010) 

確率 1/50 で ファ イタ ー フ ライ を 発生 きせ ます 。 出現 位置 は 乱数 で 決定 し ます 。 
⑱ デ ー タ 表示 用 ルー チン (6000-6300) 

残り タマ 数 , 得点 、 ハ イス コア , 残 9 ス ター シッ プ 数 を 表示 し ます 。 
@ ゲ ー ム オー バー (10000-10020) 

ゲー ム オ ー バ ー の た め の 処 理 で す 。 


文 変 数 表 


CX スター シップ 位置 
AX 補給 投下 位置 

M 残り タマ 数 

記 補給 消滅 まで の 時 間 
SH スタ ー シ ッ プ 残 り 機 数 
SC 得点 

HS ハイ スコ ア 


スプ ライ ト (DEEF MOVE) 
ーー 人 は ツア オデ ポー ズブ ズ タ ヤオ 
4 ニッ トピ ビッ カー 
5 補給 用 タマ 


6 タマ 6 還 - 


きけ まう 
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4 の 9 の J=(XFUDB(1)-16) /BILOCATEJ 。29』PRINT" "ERAI 
4 の 1 の IF Cs の OR J<>AX BOTD492g 

4915 LOCATEJ 』19』PRINT" "Cm の 』X=ー1 

4929 PUBITIDN1 。9。 の RETURN 

459 の 9 FOBSITIUN5 の dk ER 

45 の 5 IF SCR も (AX』」2 の )=" "THEN AX=ー1』RETURN 
4519 CE99ILOCATEAX 。19』FRTNT"@" ょ RETURN 

の の の IFRND(59) >gTHENRETURN 

5 の の 5 DEFMVE( 1 ) =SBPRITE (2 。 昌 1 69。 の 。1 ) 

91 の 9 POSITIONI ,RND(211)+16。4B』 MOVET iRETURN 
69 の 99 LODCATE の 』 21:FRINT "ミサ イル " ョ MI" "ERETURN 
619 の LOCATE16』21kPRINT "BCODRE"』BCI RETURN 
629 の 9 LUDCATE1 さ 』22kPRINT"H1-BCORE"iHSIRETURN 
6 さ の 9 LOCATE の ,22IPRINT "BHTP"』BHi" "MRETURN 
19 の 299 LUCATE 1 の 9,55』PRINT"BAME VER" 

1 の の 91 の IF SBC<=HS GOTO 2 の 

1 の の 2 の HBmBCI GDBSUB62 の の 』 BUTD2 の の 
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巡 々 と 降っ て くる ファ イタ ー フ ライ を , 何と か 撃退 し て ほっ と し た の も つか の 間 , 今度 は 
貢 の 地上 部 隊 に 包囲 され て し まっ た 。 包囲 を 打ち 破 ら な けれ ば 味方 は 全 減 だ 。 現 在 使用 可能 
な の は 1 人 乗り の 小型 戦車 「 ス ター キラ ー」 が 数 台 あ る だ け だ 。 こ れ で , 増援 が 到着 する ま 
て 敵 と 戦 か わな く て は な ら な い 。 前 進 基地 の 運命 は , 君 の 活躍 に か か っ て いる ググ 

コン トロ ー ラ ー を 使っ て 「 ス ター キラ ー」 を 操作 し , 周囲 を と りか こむ 敵 の 砲 を 破壊 し て 
くだ さい 。「 ス ター キラ ー」 の 方 が 射程 が 長い の と , 戦場 に ある 障害 物 れ うまく 利用 し な い 
と 。 すぐ で 平作 れ れ て し eo まず 。 


文 遊び 方 

ゲー ム が 始ま る と, 画面 の 中 央 に 「 ス ター キラ ー」 が 表示 きれ ます 。 周囲 の “回 が 敵 の 
砲 。 赤い ボー ル み た いな の は 障害 物 で す 。 

「 スタ ー キ ラー」 の 操作 は , コントローラ ー 1 を 使い ます 。 移動 は 十字 ボタ ン で 行ない ま 
す 。 移動 方 向 は 上 下 左右 だ どけ で , な な め に は 動け ませ ん 。 ま た , 前 方 に 障害 物 や , 敵 の 砲 が 
ある 場合 も 動け ませ ん 。 

A, B の 各 ボ タン で タマ を 発射 し ます 。 タ マ は 進行 方 向 に 発射 され, A ボタ ン を 押す と ,「 ス 
ター キラ ー」 の 中 心 線 の 右側 か ら , B ボタ ン を 押す と 左側 か 6 発射 さき れ ま す 。 タ マ は , 一 度 
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プロ グラ ムリ スト (BeG 画 調 デ テー タ ー は 98 ペ ー ジ ) 


1 の の CLB』CGSET1 。1』BPRITEDN』DIM DX(7) 。DY(7) 
129 FORI= ウ TD7』READDX(T) 。DY(I)』NEXTIDATA の 9。ー1。1。』ー1 。 
2 の 2.1.1.2.0 2 1 1.-1.0 
14 の 9 DEFBPRITE の 。( さ 。 1 ,。 の 。 の 。 の ) mCHR ま (1 の ) +CHR(1 昌 1 ) +CHR 
も (182) +CHR 和 も (1B2) 
25 の N= の iR=49』BH=4』 Bs1 の の 
さ の の VIEMIE=64 
4 の FDRI= の TU6』ERAT』FDBTTIUNT 。 の 。 の INEXTIBPRITE の iCX= ウ 9 
1 CY=9』D=1 GUBUBS の の: GDBSUB さ 1 の 
42 DEFMDVE(7) =BPRITE (日 14,4。 の 。1) 』PHBITION7 ,BB 。 1 の 
4』 MDVE7 
5 の の BmSTRIB (の) 』 IFB>9GBDSUB 1 の の 
51 の SB=STICK (の) 』 IFSB= ウ OURMDVE (7 ) BOTDB6 
2 の ら =ー(B=1 ) * さ ー(B=2) * フ ー(Bm4) % ロ ー(Bm 日 ) 』Tm(Bー1 ) /1』F= の 
』IFB= の GBDTD56 の 
5 の IFBCR$(CX+DX(1) 。CY+DY( 1) )=" "ANDBCR ま (EX+DX( エ 1 
) 。CY+DY(1+1 ) ) = リリ THENF=ー1 
4 の IFS<>D THENDEFMDVE (7) =SFRITE (日 。B』2。4。 の 9。1) :D=B 
545 PDSITIUN7 。CXkB+16。CYB+241 ITFF THENCXmCXー( 日 m さ ) 
(8B=7) : CY=CYー( 昌 = 呈 ) +( ロ =1 ) 
5 MVE7』IFNDT F THENFURI=gTDB 日 iNEXT』 CUT7 
569 IFNDT MDVE(6) BUTD64 の 

_ 昌 79 X=(XPDB(6) -16) / 昌 』Y=(YPDB(6) -24 ) / 昌 
571 IFX く <1ERA6』 X=g 
572 IFX>1BERA6i X=19 
7 IFY く <1ERA6』 Ys 
574 IFY>1BERA6』Y=19 
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りら ょ 』 SLB じ CR 和束 。Y) ) コマ ンタ ー 2/ 


に 一 発 ず つ し か 撃て ませ ん 。 

瑞 の タマ に は , 障害 物 れ すり 抜け て くる も の も ある の で , 障害 物 の 後 で も ノン ビリ し て い 
る と や られ て し まい ます 。 

まだ, 敵 の 砲 は 全部 で 64 個 で , 破壊 され る と , “"*" に な り ま す 。64 個 の 砲 を すべ て 破壊 す 
る と 一 面 ク リア で , 次 の 面 に 移り ます 。 面 が 進む に つれ て 敵 の タマ の 数 が 増え , 射程 も 長く 
な っ て 難し な っ て きま す 。 が ん ば っ て くださ るい 。 まあ, 最初 の うち は 一 面 ク リア する の も 
大 変 ど と 思い ます が ……。 

瑞 の 砲 を 破壊 する と 20 点 , 障害 物 は 5 点 で す 。1000 点 ご と に 「 ス ター キラ ー」 が 1 台 増 え 
まま 。 


太 ブ ログ ラム に つい て 


プロ グラ ム に つい て は , ファ ミリ ーー シック Ver.2 の フリ ー エ リア を ほぼ ば 限界 まで 使 
用 し て いま す 。 し た が っ て , プログ ラム を 入力 する 際 に は , 必ず リス ト の と お り に 入力 し て 
〈《 だ さい 。 勝手 に プロ グラ ム 中 に スペ ー ス を いれ だ りす る だ け で メモ リ 不 足 (OM エラ ー) 
に な る 可能 性 が あり ます 。 だ だし, リス ト 中 に 入っ て いる スペ ー ス は その と お り に 入れ て 
だ さい 。 取っ て し まう と 正しく 動い て くれ ませ ん 。 あ と , IFーTHEN 文 の THEN が 抜け て 
いる 所 が あり ます が , これ は 間違い で は あり ませ ん 。 

プロ グラ ム は , 大 き 〈 分 け て 次 の 様 に が なり ます 。 

100 つ イニ シャ ライ ズ 

400- 画面 設定 。 座 標 セッ ト 

500-- メイ ン ル ー チ ン 

1000-ー スタ ー シ ッ プ タマ 発射 

1500- 敵 タマ 発射 

2000ー スタ ー シ ッ プ 被 弾 

2500^- 一 面 ク リア 

3000-- 表示 用 サ プ ブルー チン 

この うち , メイ ン ル ー チ ン (500 一 ) と 敵 の タマ 発射 ルー チン (1500 一 ) を 簡単 に 説明 し て 
お きま す 。 ま ず , メイ ン ル ー チ ン は , キー 入力 と 「 ス ター キラ ー」 移 動 (500-550 行 ), タ 
の 位置 チェ ッ ク (560-630 行 ), 敵 の タマ チェ ッ ク (640-690 行 ) に 分 か れ て いま す 。 

タマ の チェ ッ ク ( タ マ が 障害 物 に 当たっ た か どう か ) は タマ の 位置 の BCG GRAPHIC 座標 を 
計算 し て , SCR$ 関 数 を 使っ て 直接 BG 画面 に 何 が 描か われ て いる か を 調べ で ,「 ス ター キラ ー」 
に 当 だ っ だ か どう か は , 両方 の スプ ライ ト 座 標 を を その まま 比較 し て いま す 。 

敵 の タマ 発射 ルー チン で 重要 な の は , 射撃 の 正確 る の 決め 方 で 、 あ まり 正確 に 撃つ よう に 
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りら 7 の IFIT=3260TO064 の 

6 の の IFI=207THENSCESC+TSgLOCATEX。YsaFRINT" "EGOUTOD620 の 
6 の 9 IF TI く >2BGOTO64 の 

619 LUCATEX。YIFRINT UM BC=G じ +2 の 』 ビー ビー1 ! IFE= の は UTU25g 


62 の ERQ6』 BUSUB さ の の の 

64 の FDRI= の TDN』 X= (XPDS(1) 16) /』Y=(YPDS(1 ) -24) / 日 
65 の IFX=-2GDGUB155 の の 

66 の IFNUT MOVE(1I)THENERATIPDSTITIHNT 。 の 。 の 』 GBDTD69 の 
679 IFXPOB(7) -6 ヾ XPOB(T) ANDXPODB(7)+14>XPOB(I) AND Y 
POB(7) -B<YPUB( 1 ) ANDYPDS(7)+16>YPOB (1) BUTU2 の の 

6B9 IFABCD(BCR*$(X 。Y) ) ms297THENLUCATEX 。Y』iPRINT" "』 ョ POB 
ITION1 。。 の 』 ERA1I 

69 の NEXT 

7 の の BOTH5 の の 

1 2 の の IFNBVE (6) RETURN 

1 の 1 の DEFMOVE(6) sBPRITE(12。D。 1 。B の 」 の 。 さ ) 』 XmXPHB(7) 』Ym 
YP ロ (7) 

1 929 IFBsBTHENDN D/2+1BUTD1 の 5 。 1 の 6 の 9 。 1 の 7 の 。1 の 4 の 

19 さ の ON D/2+1BDTD149。 1 の 5 の 1 の 6 の 。 1 の 7 の 

194 の 9 FOBITIDN6,X 』。Y』 BUTD1 の B の 

1 の 959 PDSITIDN6 。X+ 日 。YI BODTD1 の 8 の 

1 の 6 の PUBITION6 。X+ 日 。Y+ 日 』 GUTD1 の 8 の 

1 の 7 の 9 PUBITION6 。X 』Y+ 

1 9B の 9 MOVE6』 RETURN 

15 の の Xs の iY=g』IFRND(2) mgBHTD15 さ の 

151 の IFRND (2) mgTHENX=19 

1529 Y=(CPY+16+RND (日 ) ) MOUD29』 BOTO155 の 

15 さ の IFRND(2) mg の THENY=19 

154 の 9 Xsm(CX+16+RND (日 ) ) MOD2 の 
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し て し まう と ゲー ム が 難し く ,。 と いう より は つま らら なくなっ て し まい ます 。 そ を そこで, この ゲ 
ー ム で は 「 ス ター キラ ー」 の 位置 を 中 心 に し て 土 座標 べら い の 範 囲 で タマ の 発射 位置 を 決め 
て ます 。 

実際 に は , 1520 行 と 1540 行 で 乱数 を 使っ て , 多少 ズレ る よう に し て あり ます 。 今 は , 

ー 填 16 十 RND (8) 一 

と な っ て いま す が ,。 も っ と 正確 に (難し く ) し た い 人 は , この 8 を 減ら し て , 減ら し だ 数 の 
半分 を 16 に 加え て くだ さい (だ たと えば 一 十 17 十 RND (6) 一 に する )。 も っ と デタラメ に 
し だ たい 人 は , 逆 に すれ ば いい わけ で す 。 

他 に 可能 な 改造 は , 
人 @ 敵 の 射程 を 変え る 

250 行 の R=40 を 修整 (小さ きく する と 短 か く な る ) 
人 @ 敵 の タマ の 最大 数 を 減ら す 

2500 行 の N=(N 十 1) MOD 4 の "4" を 1 一 4 の 範囲 で 変え る 。 この 式 自 体 を が くし て し 
まう と ,。 タマ は 常に .1 発 で 増え な い 。 
⑱ ス ター キラ ー の 数 を 変え る 

250 行 の SH= 4 を , 好き な 数 値 に 変え る 。 
な ど が あり ます 。 これ 以外 の 変更 は 大 変 で す が , 参考 と し て 変数 表 を 載せ て お きま す 。 あと, 
画面 の 障害 物 の 位置 は BG 面 の デー タ を 変え れ ば , 好き な よう に 変更 びき ます 。 だ だ し , ゲ 
ー ム 開始 時 に スタ ー ト キラ ー が 現われ る 位置 に は , 障害 物 を 置か な いで くだ さい 。 


文 変数 表 


D スタ ー キ ラー の 向き 

CX, CY スタ ー キ ラー の 現在 位置 (BG 座標 ) 
R 英 の 射程 

N 敵 の タマ 数 

SC 得点 

X。 Y 各種 座標 用 

E 英 の 砲 の 数 


スプ ライ ト (DEF MOVE) 
0 一 5 敵 の タマ 
6 味方 の タマ 
だ ーー キ テー 
30 ファ ミコ ン ソ フト 集 00t 


155 の IFBCR$(X。Y) =""RETURN 
1 6 の =ー(Y=19) -(X= の ) * さ ー(Ym の ) # ロ ー(Xm19) ※ ブ 

157 の DEFMOVE( 1 ) =sBPRITE(12。H,1。R。 の 。 さ ) 』 PUBITIONI 。 XxB 
+16。Yx 昌 +24』MDVET』RETURN 

2 の の ERAIIBPRITE 。 XPDS(7) 。YPDB(7) 』PLAY"C2E1B の " 
291 の GHsBH-1』 IFBH<gEND 

292 の BUTO4 の の 

25 の の RmR+Bs IFR>64THENRm4 の 』 Ns (N+1 ) MD4 

251 の 9 PLAY"C1BDEF "BOTD さ の の 

さ の の の LUCATE22 BPRINTBC 

さ の 1 の IFBC>=B THENBHmBH+ 1 』 BmB+1 の の の 1 BOBUB さ 1 の の 

さ の 2 の RETURN 

さ 1 の の LOCATE2 さ 』12nPRINTSBH』" "iRETURN 
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JE  . 虹 旨 時 昌 暫 JH JR 間 E 則 放 生計 還 上 時 町 』 


陳 季 に コ 


P 
棒 
ま 
の 
、 
『 
森 
上 
の 
培 


生生 


この ゲー ム は , コン ピュ ー タ ー・ ゲ ー ム の 大 古典 と も いえ ます 。 お そら 〈《, ほとん どの コ 
ンピュータ ー 用 に 発表 , 発売 され て いる で し ょ 2 う 。 

ルー ル は 簡単 で す 。 丸 い 球 を コン トロ ー ラ ー で 上 下 左 右 に 動か し て くだ さい 。「$」 が エサ で 
す 。「$」 を 食べ る と , いも 下 の 長 る が 一 つ ふ えま す 。 か で に ぶつ か っ た り , 自分 の 体 に ぶつ 
か る と GAME OVER で す 。 また レベ ル 8 一 9 で は , ある 長き る 以上 に な る と,「 貞 」 が 出 て き 
ます 。 こ の 「 氏 」 に ぶつ か っ て も , GAME OVER で す 。「$」 1 個 食べ る ご と に 得点 は 10 点 
プラ ス さ る れ ま す 。 


文 遊 び 亡 


「RUN」 す る と , ゲー ムレ ベル を 聞い て いき ます 。 0 一 9 の 数 字 キ ー を 押し て 《 だ さい 。 
れ は , いも 忠 の 移動 スピ ー ド を 変え ます 。 0 が 一 番 遅 く , 9 が 一 番 速 く が っ て いき ます 。 
の 時 , RETURN キー は 押す 必要 が あり ませ ん 。 

得点 は 画面 下 に 表示 きれ ます 。GAME OVER に な る と を の 回 まで の ハイ スコ ア が 表示 る 
れ ま す 。 ハ イス コア は , スト ッ プ キー で ゲー ム を と め た だ たり , 電源 を 切ら な い 限 9 り 残 り ま す 。 

この ゲー ム に は いろ ん な バリ エー ショ ン が あり ます 。 だ と えば , 砂 剖 で エサ きる が し 。 こ の 
場合 、 エ サ を 1 つ 食 べ る と エネ ルギー が 20 に ふえ ます 。 を そし て 1 移動 ご 上 と に エネ ルギー が 1 


(ffY fy 
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プロ グラ ムリ スト 


1 の 9 DIN R(1 9 の ) 
< FOUR Im の 「 ロ SI 人 a( の 1) = 人 (1 1) = の INEXT 
49 じ PLSiLULATE 0 り ,19.PFRINT LEVEL LUMO  --- IOH カ マ 


45 まま mINKEY も kT エ F 人 条 く り 2) OR 人 >79 リ 0 THEN 45 
ら の MA=2 プ ウー ソ AL (人 も ) * さ の 
ら 6 ら ウ し し ら 5 
/9 LULAIE 9 り . 9.FRINT LHRW(23977MaFUN 1=1 1U0 264FRINT 
CHR も (237) jsNEXTIPRKINT CHR も (24 の )』 
けり FUR jam1 TH 210LULATE り DIIFRINT ULMRG(22B) IrLOCAT 
E マ /。1IFRINF CHR(ZSBDMINE4「 
7 の LUUIIE 9. 22Z0FRINI LHR も (241)IIFUR !a1 1U 26uFRIN 
T CHR 和 (237) anNEXTIPRINT CHR も (242)1 
11 の 2 FOUR Ij= の 2 TO 9 
120 LUCUAIE RMND(26)+T1 。RND(21)+TIIPRKINT $ 生 1 
1 3 の NEXT 
14 の 9 X=14』 QRY テ CH テ 4 人 L=1 3 RF テ =: SC= の 
15 ウ (の の) =14:R(1 4 の) =2 
Z の の GUSUR 9 の の 
<1 の KeSTICK( ウ 2) iTF KK2 の THEN 人 HH=K 
ZZ FOUR Im の TO MAINEXT 
2o の BUIH 200 
9 の IF H=4 THEN RAY= 人 RAY+1 
91 の IF AH=2 _ THEN AX= 仙 メー1 
ワ 92Z の の IF HB THEN RY=RRY-1 
9 さ の IF H=1 THEN AX=AX+1 
1 の の の AF=AF+1』 IF FmS1 THEN Fm 
191 の AE=AF- 人 AL IF AE の THEN AE=RE+51 
いも 皮 ご ろ ご ろ 393 


マイ ナス され , 0 に な る まで エサ を 食べ な いと エネ ルギー 切れ に な り ま す 。 こ れ も , も う ひ と 
ひね り し て , エサ を 一 つた だ され ば 長き が 一 つよ ふえ, エネ ルギー を 10 消 費 す る ご と に 長き を 一 
つ へ ら す 。 と いう の も 考え ん 65 れ ます 。 
たとえば, 140 行 と 1350 行 を 変更 し , 1005 行 を 追加 し ます (リス ト -2 )。 こ れ で , いも 忠 は 20 
回 移動 を くり 返す まで に エサ を と ら な けれ ば GAME OVER に な っ て し まい ます 。 

この プロ グラ ム の 特長 は , いも 中 の 長き る が 長く な っ て も 移動 の 速度 を 変え た ん な くす る だめ , 
常に 頭 し し っ ぽ の 部 分 し か 見 て いな い , と いう 点 で す 。 い も 下 の 各 部 分 の 座標 は 配列 変数 
A ( ) . の 中 に 入っ て ます が , 先頭 =AF, と , 長き ニ AL だ け で すべ て を 管理 し て いま す 。 を 
し て 配列 変数 A ( ) を 使い きる と まだ はじめ か ら 登 録 し て いま す 。 し た が っ て へ ビ ば の 長き 
を 変え る 時 は , 10 行 , 1000 行 , 1010 行 , 1350 行 を 変え て くだ さい 。 短く する 時 は 1350 行 だ け 


壇 プ ログ ラム の 説明 


10 配列 宣言 
20 配列 変数 の 初期 化 
40--50 レベ ル 選 択 


60-90 わく を 書く 
110-130 最初 の エサ の 配置 
140--150 変数 の 初期 化 


200 いも 虫 移動 の サブ プ ブル ー チ ンコ ー ル 
210 方 向 変換 の よみ と り 

220 レベ ル に 応じ た 時 間 待 ち 

230 200 行 へ も どる 


900-930 進行 方 向 に よる いも 虫 の 先頭 位置 決定 

1000-1010 ポイ ンタ ー 変 更 

1020 一 1030 進行 方 キャ ラク ター を し ら べ る 

1100 一 1300 ポイ ンタ ー の し めす 所 に いも 虫 の 先頭 座標 を 登録 , いも 虫 を 表示 , 一 番 う し 
ろ の 位置 を 消し て , メイ ン へ 

1350 エサ を た べた 時 の 得点 を プラ ス し , エサ を 消し , 長 さ を ふやす 。 長 さ が 50 以 
上 な ら 障 害 物 を 置く サブ ルー チン を 呼ぶ 

1360 一 1390 減っ た 分 の エサ を 他 へ 置く 

1400 一 1420 障害 物 を お く , サブ ルー チン 

1500 一 1600 ハイ スコ ア を きめ て 表示 キー を 押す と 20 行 へ 
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1 の 2 の IF BCR$(AX』Y) = りり THEN BODSUB 1 さ 35gGOTO 119 の 
19 ぶ の IF BCR$(AX』AY)X>" リ THEN 15 の 

11 の の QA(g。AF) mAXIA(1。AF) mAY 

129 の 9 LUDCATE AX。AY』PRINT CHR も (2 の 7) 』 

1219 LUCATE 人 A( ウ AE) (1。AE) iPRINT " " ョ 

1 さ の の RETURN 

135 の 9 AL=AL+11BCmSC+1aLUCATE 6,2 さ PRINT "BCORE mi 

Ci" の "iiLUCATE AX,AYIPRINT CHR$(297) 』i IF AL>5 TH 

EN AL=5 の 』IF MA<42 THEN BUBUB 14 の の 

1 さ 6 の BXmRND(26)+1』 BYsRND (21)+1』TF SBCR$(BX。BY) く > リ 
THEN 1 さ 6 の 

137 の LUCATE ERX。BYIPRINT "香り 

1 さ 9 の 9 RETURN 

14 の 9 の IF RND( 呈 ) *2ー ベ <MA/12 THEN RETURN 

141 の 9 CX=RND (26)+1』CYsRND (22)+1』 ITF BCR 還 (CX。CY) で > リ 
THEN 141g 

1 42 の 9 LUCATE CX。CYIPRINT CHR(219) 』sRETURN 

159 の 9 LOCATE 7』BsPRINT " BAME OVER  "』 

151 の 9 IF BCP>HS THEN HBmBC 

152 の 9 LOCATE 曲 。19』PRINT " HI-BCORE =rIHSS"O "ii 
15 さ の LOCATE 7。12』PRINT " HIT START  "l 

154 の IF BTRIB( の ) = の THEN 154 の 

169 の 9 BOTO 2 
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文 変 数 表 

AX いも 虫 の 先頭 の 座標 

AY いも 虫 の 先頭 の Y 座標 

A( 0, n) 

A( 1, n) 

AH いも 虫 の 進行 方 向 , STICK に 対応 

AL いも 躍 の 長 さ 

AF 現在 いも 虫 の 先頭 の X, Y 座標 が 配列 変数 人 ( ) の どこ に 入っ て いる か を 示 
す ポ イン ター | ・ | 

AE いも 虫 の 一 番 う し ろ (消さ な けれ ば いけ な い 場 所 ) の 座標 人 ( ) の どこ に 入 
っ て いる か の ポイ ンタ ー 

SC 得点 

AX 

AY 

BX 

BY ミー の X・Y 座標 

CX 

CY 

WA 待ち 時 間 (レベ ル ) 


) 順番 に AX。 AY を 入れ て いく 
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本 


7 SW『 1 時 TIN WEE Ei 


いも 虫 ご ろ ご ろ 3Z 


ゆ ょ 


/ 。 ト 基 し 介し 介し 


IA アフ 


NO 
NO 
NKO う 
NO。 
1 で 、e ) 
1 で 、@ 」 


ほら , ガン バレ 。 止ま っ て な いで 前 に 進ん で くれ グ こら 6, 4 番 の カメ る ん 。 お まえ に 残 
り の 金 全部 賭け た ん だ か ら , 当たれ ば 9 借 の 大 究 だ 。 : あ っ , こら こら , 1 番 と 3 番 , 先 に 行 
くん じゃ な い 。 

いや 1 番 を の まま 行っ て し まえ 。 オ レ は 1 番 に 賭け た ん だ 。 ガンバ レグ 

た じゃ 。 ころ も は と うな る ん だ 。 

ん な の 知る か . グ 

以上 , ある 日 の カメ きん レー ス , 白熱 する ギャ ラリ ー の 声 で し た 。 


文 ゲー ム の 説明 
全部 で 6 匹 の カメ る ん の レー ス で す 。 1 - 4 人 で 遊べ ます 。 1 人 で 遊ん で も つま ら な い の 
て 。、 て きる だ なけ 次 硬 て 必 び まし よ 上 
ゲー ム 開 始 時 は 各自 500 円 (少な いと 思う 人 は ドル だ と 思い まし ょ う ) ずつ 持っ て いま す 。 
賭け 方 は 単勝 の ひみ で , 1 着 の カメ さん を 予想 し て くだ きい 。 賭け 金 の 上 限 は あり ませ ん (も 
ちろ ん 所 持 金 の 男 胃 で す ) か ら , 一 発 勝負 の 好き な 人 は , 大 穴 に 全部 賭け て み ま し ょ 2 う 。 
全員 が 賭け 終わ っ た ら , 一 勢 に スタ ー ト で す 。 あ と は ひたすら 6 大 騒ぎ し な が ら 見 守っ て く 
だ さい 。 競馬 と 違っ て , 相手 は カメ る ん で すか ら な か な か 進み ませ ん 。 完全 に 止ま っ て し ま 
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ブロ 


1 の 
11 の 
12 の 
1 の 
1 4 の 
15 の 
1 6 の 
1 / り 
180 
19 の 
([) = 
< の の 
<10 


5 の の 


っ 1 の 

ウン 

ご ご の 

1 の の の 
1 の 1 の 
1 92 の 
1 の 3 
1 94 の 
1 の 5 の 
1 の 6 の 
1 ウ 7 の 
1 9 の 
1 97 の 
1 1 の 


グラ ムリ スト 


CB5GET1 25FRITEUN 

DIM ロ D(5) 。MN( ス ) 。U(1 うう ) NNA ま (こう ) BL( う ) 
FUR j ら 2 | 日 っ 

DEFIUVE(T) GOFRKITE(1 ス 7 . う .4.9 っ) 
NEXT 

し LSDNFTUI 7 フン ニ ン ソ ヒ 上 マス パカ 
IF FLC1 DUR FL24 DUIU 190 
ビレ = ド レー 1 

FUR jeg iU FL 


on) 】 


ンク 


(1-4) "』PL 


PRINT _ "NH IT。| 2 / ナ 2 エリ) / juINFUI MA も (1)ihO ま 


LEFT「 ま (NOA も (【T) 日 / 
MN( 1 ) = ら の の 
NEXT 

FUR 「U=1 「UD 6 
GUSUE1 の の の: GUSUE222: GUSUE さ 2 
NEXT 
END 

FUR 1j= の の 「 ロ DU 
OUD(T)=RND(⑦) +1 

NEXT 

FUR je20 「U FL し 
LLSBgpFRINT の ィ ー ル LIUL レース FRIII THU. 
FUR J=g 「U SLFRJIUITJI 』 ん jUD(J) nhEA[ 
LUCUAIE 9.1924FRIMINA あ (LU リ 1 9 レノ リン テ ス 
PRKINIF ワン リサ 4 ショ レシ キン FNHIL/ 

INFUI トト ノ / カ グー 7 カ 77227 4U(2」)/ 

IF _ U( り 9. 1) く の 9 DR U(O.1)29 GUIO 10609 
IMFEUI イノ ラ カ 77 ス カ 2 1H(1 1/ 


ご 


(BG 画 面 デ ー タ ー は 99 ペ ー ジ ) 


リコ リノ 


う カ メ さ ん も いま す が , いつ か は 全部 ゴー ルイ ン し ます か ら 。 

全部 の カメ る ん が ゴー ルイ ン し た ら , 払い 戻し で す 。 時 々 同 着 の 1 位 が あり ます が , 倍率 
と お り の 払い 戻し が 当っ だ 人 みん な に あり ます 。 親切 な レー ス で すね 。 

文 遊 び 方 

まず 最初 に 遊ぶ 人 数 を 入力 し ます 。 

次 に 各 プ レイ ヤー の 名 前 を 入力 し て 《 く だ さい 。 

名 前 を 入れ 終わ っ た ら , さっ を 〈 第 1 レー ス が 始ま り ま す 。 1 人 ずつ 順番 に 好き な カメ を 
選ん で 番号 を 入力 し て , 賭け 金 を 入力 し て くだ さい 。 この 時 , 画面 の 上 に , 各 カ メ さ ん の 倍 
率 が 表示 され ます 。 選 ん だ カメ さん が 見 事 1 着 に な れ ば , この 倍率 X 賭 け 金 が 払い 戻る れ ま 
す 。 倍率 は 最低 1, 最高 9 倍 ま で で す 。 賭け 金 の 制限 は あり ませ ん 。 

全員 が 賭け 終わ っ た ら 6, 一 斎 に スタ ー ト で す 。 

カメ さる ん が ゴー ル す る と , 横 に 着 番 が 表示 され, 全部 ゴー ル す る と , 画面 の 下 の 方 に 

HIT ANY KEY 
と 表示 が で ます か ら , 好き な キー を 押し て くだ る きい 。 
その 後 , 当たっ だ 人 に 対す る 配当 が 表示 され , 再び 
HIT ANY KEY 
が 表示 る れ ま すか ら , キー を 押し て くだ さる い 。 次 の レー ス が 始ま り ま す 。 レー ス は 全部 で 6 
デー スズ お のり ます 。 
文 プ ログラム の 説明 
人 初期 設定 (100 一 210) 

配列 宣言 スプライト の 定義 プレ イヤ ー の 人 数 入力 , 各自 名 前 入力 を 行ない ます 。 
@ メ イン (500-530) 

各 レ ー ス の 処理 を 呼び 出し , 6 レー ス 行 な っ たら 6 終わり で す 。 

@ レー ス 前 , カメ 選び (1000 一 1140) 

各 カ メ の 倍率 を 決め (1000 一 1020 行 ), 各 プ レイ ヤー の 入力 を 行ない ます 。 

まず 倍率 を 表示 し て (1040 一 1050 行 )、 その プレ イヤ ー の 所 持 金 を 表示 し , 選ん だ カメ さん 
の 番号 を 入力 , 続け て 賭 金 を 入力 し ます (1060 一 1130 行 ) 。 

@ レ ー ス 処理 (2000-2180) 

画面 シク リア し た 後 , カメ の 番号 と 倍率 を 表示 し ます 。 ス ター ト 位 置 に カメ セット し て , 
全部 の カメ を 動か し ます (2010 一 2050)。 

後 は , 各 カ メ を 乱数 で 進め て , ゴー ル に 達 す れ ば 順位 を GL(H) に セッ ト し ます 。 変数 GH 
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TFT HCl 、 1)・ の OR し 、 D SNN(E) pro 11 の 
MNTDaHN(T)-U は r 9 人 ー 
NEXT 
_RETURN _ 
VIEM: BH=g』 WenrsBPRITEDN 
FOR Hsg TO5S “ 
LOCATE 9,Hx3 *+2rFRINT "NO。 H 
LEATE 24. )H*3+2+PRINT"X"OD(H) 
PHBITIDN H,224 』HX24+ さ 2 
GL (H) =9』NEXTIMOVE9。 12S74 
RaiHNN 、 
FDR Hs=g TO 
_IF BL (H) > の BaTn 2120 
IF MOVE(H) BOTO 2110 
IF RND(9) = THEN MOVEH 
ITF XPOB(H) く 49 BDSUB 215 の ーー 
_NEXT 
IF BH=6 THEN RETURN 
BOTD 2 の 6 の 
ITF Rm1 THEN MsmMb+HEX も (日) 
BL(H) =R』BH=GBH+1 
LOCATE 4。H さ +2aPRINTR 
RETURN " ーー " 
LOCATE@。225PRINT"HIT ANY KEY"IIFAUSE』SBFRITEDF 


さ の 1 の CLSIFDR 1mg TO FL 
3 の 2 の FUR J=1 TD 6 _ 
ささ IF MID も (も 。1) mHEX$(U( の 。T) ) THEN MN(T)=MN(I) 
+U(1 1) xDD(U( ウ 。T) ) 』PRINTNA(T)* リ サン ノ nh ーー 
2 1) ) 
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は ゴー ル し だ た カメ の 数 で , GH ニ = 6 に な れ ば 処理 を 終わ り ま す 。 
信 レ ー ス 後 処 理 (3000--3060) 

画面 を シク リア し て か ら , 1 番 の カメ と, 各 プ レイ ヤー の 予想 を 比較 し , 当たっ て いれ ば 所 
持 金 に 倍率 X 賭 け 金 を 加え ます 。 


文 変 数 表 


OD (H) カメ の 倍率 

MN (P) プレ イヤ ー 所 持 金 
U(『, P) プレイヤー 予想 (カメ の 番号 
U(1, P) プレイヤー 賭け 金 

NA$(P) プレ イヤ ー 名 前 

GL(H) カメ 順位 

W$ 1 位 の カメ 番号 

PL プレ イヤ ー 人 数 

ロ プレ イヤ ー 識 別 用 変数 


邊 HDSSNHG664 


BDDOHGDS3DHNIRNRRHOUDDNHIDHRGHNOIDNDNBDENGRRONOSHNIRORRONIDNIHIN 


ま 


HHHIUHUHUIHHIHHIN い ド 3 お 羽 


の 


HH3HHH13H3DHR33 い 72 NO は 3HNSNNGRHGI 


0211 い 1 3 ODN 


22 DOSRNR3DOSNN 


KRHHNSRN 
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さ 949 NEXT』NEXT 
さ 95 の 9 LUCATE。22PRINT "HIT ANY KEY" 
1 ーー ー 

3 の 69 RETURN_ 


krPAUBE+ BPRITEOF 


066tHRHH4HH33333 6646H48 有 3 MHDUUHIHHR3900UROBHB9HB00 3 は 31 けけ 27 20390 


9% は 


3133 お HBDUIUH HHHUHH 


KRHGHIDDIHIERHOSHDHO1IOO2 RTRY33H324H33 れ 1 
EBIB22H2H NAM 912DUERDDDB20GY202UU11RCDUCHO0P3UDHOO0OOUUH 0HHHHUUODRIUUUINUOUUTOUUU 
8 遇 HBH303H8B3330888880RUHHHHH2PHNH2HHO2OOAOUUOOUUODUD2O0UBODOODDUOODODUUIOUOOUGOUOO 


HIHDBUBDSD 282EG33H2242RGHGG71OUEHDUDUDDODGUH HBHUUUUH 


BDD32DD23 肖 2 113 4 3 出 2 1 HH 朋 級 電 寺 833 
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ペン ペン が まち が っ て , ニタ ニタ の すみ か に 迷い こん で し まい まし た 。 3 匹 の ニタ ニタ が 
ペン ペン を つか まえ よう と し て 近づい て きま す 。 し か だ が な い の で ,。 バク ダン で ニタ ニタ を 
や っ つけ て し まい まし ょ う 。 でも, ペン ペン が 持っ て いる の は 時 限 バ クダ ン な ん で す 。 だ か 
ら ニ タニ タ が 通り を うな 所 に うま く 〈 置 いて 歩か な くち ゃ 。 置い た ら す ぐに そこ か ら 離 れ な い 
と 自分 ちい っ し ょ に や られ ちゃ うか ら 気 を つけ て 。 


ゲ ー ム の 説明 

ペン ペン を 動か し て , 時 限 バ クダ ン を うま く 《 セ ッ ト し て ニタ ニタ を や っ つけ て くだ さい 。 
バク ダン は 同時 に 3 カ所 に モッ ト で きま す 。 バ クダ ン を セッ ト し た 所 は 通路 の 色 が 黄色 く な 
り ま す 。 セ モ セット し て し ば らく 〈《 す る と 爆発 する の で , や られ な いよ うに うま 〈 パ 逃げ て くだ さい 。 
バク ダン が 爆発 し た と き , その 場所 か ら 6, 上 下 左右 に いた 物 は 全部 や られ て し まい ます 。 

得点 は , ニタ ニタ 1 匹 が 10 点 で .。 ニタ ニタ を 3 匹 や っ つけ る と 1 面 ク リア で その 時 の ボー 
ナス が 加算 され ます 。 得点 2500 点 ご と に ペン ペン が 1 人 増え ます 。 全 部 の ペン ペン が 爆発 で 
や られ る か , ニタ ニタ に つか まる と ゲー ム オ ー バ ー で す 。 

面 が 進む と た, だ ん だ ん ニタ ニタ が 硬く か ら 6 で も ペン ペン を 見 つけ て 近づい て くる よう に な 
り , 正確 に ペン ペン を 追っ か け て くる よう に な り ま す 。 まだ, 3 面 ご と に ニタ ニタ が 動く ス 
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プロ グラ ムリ スト (BG 画 面 デ ー タ ー は 100 ペ ー ジ ) 


1 の 9 の CBSET1 。2』BPRITEHN』DIMB(2,2) 』FDRIm1TO4』 DEFMDVE ( 
1 ) =SPRITE(4。 Tk2ー1 , さ 。 日 。9。 の ) i NEXT 

11 の PALET B 1。47, さ 日 。 さ 日 。 さ BiPALET B 2。47,22。22 22 
さ の の LUCATE5,BiPRINT"HIT ANY KEY ! "iPAUBSE 

さ 1 の IFSC>HSB THENHBsSC 

さ 2 の SC= の BN=2 ロ の の ュ GBP= さ 』 Rm 1 の 』 FE=2 

4 の の IFMDVE(D) GBDTO4 の の 

41 の VIEM』 BUBUB さ の の の 9』 BDBUB さ 1 の の 』 BUDBUB さ 2 の の 』 BUSUBS さ の の 』E 
RAD , 呈 。6。7』E= さ kTM=5 の Da2CXm4sDYm1 

429 PDBITIUND 。 さ 2 。 さ 2 FOR TsBTD7』 PDBITIDNTI 16 の 。12BrB( 
9。!- 王 ) = の 9』 NEXT MDVED 

の の IFSTRIB( の ) =BBUBUB1 の の の 

1 の =STICK (の) 』 ヨー(B=1 ) X2ー(B=2) *4ー(=4 ) * さ ー(G= 日 ) *1 
29 IFB=gDRMDVE(D) BDTD57 の 

らら さ の X=CXー(B=2) %2+ (Bm4) 2IY=CYー(Bm さ ) %2+(Bm1 ) % の 

品 4g IFABD(BCR$(X+1 。Y+1 ) ) <S255BDTD57 

55 の IFD<58 THENERAD』POBITIONB , XPOB(D) ,YPDS(D) 』 DsS 
6 の CX=X』CY=Y』MOVED 

57 の FURI= の TO2 

5B の IFB(,1) > の THENB(。1) =mB(。T) 一 1』 IFB( ロ 。1) mgBDSUB 1 


ッッ の NEXT 

6 の の FURImSTOZ 

ら 61 の IFXPOUS(T) =25SGUTO710 の 

6Z の の XpXPUB(I) ーーX バ FUGO(D)IYmYFPHS(T) YFLUHS(D) 

6 ぶさ の IF(RES(X) く 14 人 ANDY= ウ )UR(RES(Y) く 14NDX= の ) GUTU2 の の の 
64 ウ IFMUVUE(I)GOTO7Z10 の 


チッ クタ ッ ク BOMB 45 


ピー ド が 少し ずつ 早く な り , 9 面 で 最も 難し く な っ て , 10 面 で また 1 面 に 戻り ます 。 


文 遊 び 廊 


プロ グラ ム を RUN し ます と 
HITI ANY KEY / 
と 表示 る れ ま すか ら , キー ボー ド の 好き な キー を (STOP キー は だ めで す よ /) 押す と ゲー 
ム が 始ま り ま す 。 

ペン ペン を 動か す に は コン トロ ー ラ ー 1 を 使い ます 。 十字 ボタ ン で ペン ペン は 上 下 左右 に 
動き , A ボタ ン で 時 限 バ クダ ン を ペン ペン の 位置 に モッ ト し ます 。 こ の 時 , A ボタ ン を 押し 
っ ぱな し に し て いる と 同じ 場所 に 2 つの バク ダン が セッ ト さ きる され て し まう 事 が ある の で 注意 し 
て ん きい 。 

文 プ ログ ラム の 説明 
念 初期 設定 (100 一 420) 

100, 110 行 が 配列 宣言 と スプ ライ ト , パレ ッ ト の 定義 部 分 で す 。 

300 行 以降 が 変数 の 初期 化 や スプ ライ ト 座 標 モ セッ ト な どの 部 分 で す 。 ペ ン ペ ン の 数 を 増やし 
だ い 人 は , 320 行 の 。 PE ニク 2 を 変更 し て て だ さい 。 

@ ペン ペン 移動 (500 一 560) 

まず コン トロ ー ラ ー の 入力 を 調べ で , A ボタ ン が 押 き れ て いれ ば 1000 行 か ら の バク ダン セッ 
ト 処 理 を 呼び ます 。 

次 に 方 向 の 入力 を 調べ , 方 向 (1 一 4) を 変数 D に セッ ト し ます 。 入力 が あれ ば を その 方 向 
に 移動 を 行ない ます 。 入力 が な い 時 は , ペン ペン が 移動 中 の 時 は ここ の 処理 は スキ ッ プ し ま 
すん 。 

@ 時 限 バ クダ ン の カウ ント (570-590) 

3 つの バク ダン を 調べ で 。 セ モット る れ て いれ ば タイ マー を 1 減ら し ます 。 0 に な っ た だら 1500 
行か ら の 爆発 処理 を 呼び ます 。 
⑱ ニ タニ タ 移 動 

ペン ペン と の 距離 を 調べ で べ 、 それ に よっ て 移動 方 向 を 決め , 移動 し ます 。 

ペン ペン を つか まえ だ か どう か は 630 行 で 両方 の 座標 を 調べ , 重なっ て いた だ た ら 2000 行 に 飛び 
ます 

710 行 で は , ボー ナス を 1 点 減 らし ます 。 

@ 時 限 バ クダ ン セ ッ ト (1000-1020) 「 

トナ ン オ 人 ソ よい Pe っ る セッ ト る れ て いた だ ら ( 全 部 の タイ マー が 0 で な けれ ば ), 何 も し な いで 
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65 の し = ABS (X) +ABB(Y) 
_THe299 _ 
67 の rFaBS (X) >aBB (Y) TH 
_6Bg Hs1-(Y<@)*4 。 
699 X1=XPOB(T) 』X=(X1-16) / 日 
ー)』Ym(Y1-24) / 日 -(H=55) *2+ (Hm1) _「 “ 
79 の TFASC(BCR(X、 の )=255THENDEFMOVE (1)=SPRTTEY11、 
Pa 16。9。 2) 』 POSITIONI , X1 Yi ・ 


(R) く L THENH=RND (4) *2+1kBOD 
) *4: BDTD69g 


1 


_73g GOTO59g ーー 
19 の 99 IFB(, N) >gTHENRETURN ーー 
、 11 B(1,N) =CXiB(2,N) =CEYIB(g ト 
1929 POLDRCX。CY。1』Ns(N+1) MOD 
15 の X=B(1。1)』YmB(2。1) ょ FURJm2 
1519 CDLORX,Y。J』COLORX+2。Y。dI 
ーー1』JIEOLURX 。Y+2 JiNEXT』 XmXX 日 
152 の FORJ=5T ロ 7』 X1= =XPOB ( け ) 』 YimYPDS(J 。 
_1539 1F NOT ( (ABB(X1-X) く 24 人 | ORtemetyi-<2 
AND Xis0)GDTDlgag 。 _ 
1549 ERAJPOSTTTONJ 。 2 255』 EmEー 1 TFEm の RETURN 09 
55g BC=SC+10』 OSUBS の gi IFBC>mEN THENPEePE+1G0BUB 
3200』 EN= =BN+2599 。 ー 
156g NEXTIX=B(1,1)』YmB(241) 。 ー 
157g TF (QBS (CX- ーX) くさ ANDCY= Y) DR (ABS (CY-Y) < さ ANDCX= XR 
ETURN2 の gg 」 
159g RETURN | 
_ 299 PLAY"C1ECG"』PE=FEー -1: TFPE く gGDTO さ O9 
、2919 BOTD49 の 
、 25 の 9 BC= rBC+TMi BDBUB さ Oggi R=R+25I TFR く 175BOTD40g 
2529 R=10g: 8P=BP-1』 IFSP= の THENBP=3 
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戻り ます 。 そ う で な けれ ば , バク ダン の 双 座 標 を 配列 B(1, N) に , Y 座標 を B(2, N) 
に セッ ト し , 爆発 ま び の タイ マー と し て B(0, N) に 時 間 ( 今 は 15) を セット し ます 。 

ほ 間 を 短 か く し だ た だい 人 は , この 数 字 を 小さ くし て 〈《 だ さい 。 
@⑱ バ クダ ン 爆 発 処理 (1560-1590) 

まず を の 座標 の まわ り に ニタ ニタ が ある か を 調べ , いた ら 消 し て 得点 を 10 点 加算 し ます 。 
ニタ ニタ の 数 が 変数 に セッ ト き る され て いる の で , これ を 1 減ら し ます 。E が 0 に な っ た だ ら 1 
面 ク リア で すか ら 2500 行 に 飛び ます 。 深 に ペン ペン の 座標 を 調べ , 爆発 の 範 胃 に 入っ て いた 
ら 2000 行 に 飛び ます 。 


文 変 数 表 


ペン ペン の 座標 
D ペン ペン の 向き 
N バク ダン の 番号 
B(0, N) バク ダン の タイ マー 
B(1, N) バク ダン の xX 座標 
B( 2 , N) バク ダン の Y 座標 


1 4 ペン ペン 


5 7 ニタ ニタ 


E ニタ ニタ の 数 

PE ペン ペン の 数 

TM ボー ナス 

SP ニタ ニタ の スピ ー ド 
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ぞ ら ご の GUTO4 の 0 の 
ご 999 LOCATEB』 2 の PRTINTSC』 RETURN 
さ 199 LUCATE14 9: PRINTHS』RETURN 


ご < の 9 LOCATE29 2 の 93FPRINTFE』" "RETURN 
ささ 9 の 9 LOCATE19。19sPRINTTM』" "giRETURN 
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リオ て ジャ ソ ケ ソ 


ジャ ン ケ ン は 日 本 の ふる ーー い あそび で す 。 で も, 日 本 で なけ の あそび で は あり ませ ん 。「 グ ゲー 
「 チ ョ キ 」「 パ ー」 こ を 使い は せん が , 同じ よう な あそび は , 世界 中 に ある そう で す 。 
ゲー (f) 紙 に は 包ま れる が ハサミ に は 切ら れ な い 
チョ キ ( ハ サミ ) 紙 は 切れ る が 石 は 切れ な い 
ッ \ー  ( 紙 ) ハサミ に は 切ら れる が 石 を 包む 
ジャ ン ケ ン の 意味 は 上 の 通り で す が , 他 の も の を 使っ た も の (猟師 と 鉄砲 と 熊 , へ びと か 
ん る と が ゆる を 形 ) 還 だ くき 売 あ る よう で す 。 
文 ゲ ー ム の 説明 
この ファ ミコ ン 版 ど ジャン ケン は 次 の 三 つ を 使い ます 。 
マリ オ 一 アキ レス に は 強い が レデ イィ イ に 弱い 
レデ イィ 一 一 マリ オ に は 女 の 強 味 , で も アキ レス に は 人 負け る 
アキ レス メー 一 カカ で は マリ オ に 負け る けど レデ ィ イ に は 勝つ 
だ けど , た だ の ジャ ン ケ ン で は つま ら な い 。 そこで, 次 の よ うな ルー ル を 決め まし た 。 
コン ビュー ター も プレ イヤ ー も , マリ オ ・ レ ディ ・ ア キレ ス の カー ド を を それぞれ 2 枚 持つ 。 
この 6 枚 は 表 に し て 相手 に 見 せま す (オモ テカ ー ド )。 その あと 5 枚 の カー ド が 配ら れ ま す 。 
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ブ プロ グラ ムリ スト 


14 のり ウ LLSBISFRIIE DMuDIHN (1 5) 
< FOR Im の TO 2kREAD 人 衣 
S9 DEF SBPRITE 了 。(T。1。 の. の. の ) smCHR 和 も ( 谷 ) THR も (全土 1) し じ HR 條 
(合せ 2 ) キ じ HR 生 ( 谷 二 さ ) 
つり DEF IMUVE(I) BPRIIE( リ 、/、 1 、Z0 9.)) 
4 DEF SFPRITE さ +T エ 。 (1 。1 の 1 の) =CHR も (人 +1 ) + キ じ HR も ( 谷 ) + キ じ H 
R ま (ロキ すさ) キ じ HR( 腸 二 2 ) 
45 DEF MOUVE([ エ + う ) =5PRTITE(J 。 さ .】. 29. の 9。1) 
5 の KEY 1T+1 。CHR ま も (49+T) +CHR ま (1 さ ) g NEXT 
69 DATA の の.2BH。1.64 。 さ 
1 り 2 FUR Ieu 「 2 
11 り の BPRIIE 」、15 ら 4 2 と 2411M2BISPRITE 11 う 7 ワ 2 2 ロト TMZ4 
12 の (の 。【) = ジョ (1 。T) = 
1 さ の NEXT』CVU=2』 YUs の CCY テ の 
149 FOR Ii= TO 4』J=RND( さ )+ ミ さ ョ (の JJ) = 人 (の 。J)+1』J=RND ( 
さこ 2 すさ (1) = 人 (1 。J)+1iNEXT 
< の の GOUSUB 9 の の 
C1U り LUUAIE BI1ZIFRINTI 2 こ ラス ィ 』 
22 の 9 IF A(1。9)+TA(1 。 さ ) > の THEN LOCATE 9.14』FRKINT "F1m 
イソ オ  '!I 
2 さ の IF 朋 (1。1)+TA(1.4)20 THEN LUUATE リウ 12901PRINI 「F2= 
レティ 1! 
24 り 9 IF A(1 21A(1 9)20 THEN LUUAITE 1B 1I4IPRINI FS 
= アキ レス " 
< ら 9 LUULIIE りり .1GJFKINT WILUUITE のり 15IJNFPU「 
Kn【F K く 1 UK ド 23 IFHENM 290 
<6 り 1F (1 ドー1) す (1 、 ド LAOX】4 THEN 25 の 
2Z/ [F (1 。 に ドー1)5 の 9 THEN 3 
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これ は 何 が くる か まっ だ くわ か り ま せん 。 そ し て この 5 枚 の カー ド は 相手 に みせ ませ ん ( ウ 
ラ ・ カ ー ド )。 こ の 合計 11 枚 の カー ド を 1 枚 ずつ 出し 合っ て 勝負 を 決め ます 。 


文 遊び 万 

ブログ ラム を 打ち こん だ あと 「RUN」 す る と , 図 -1 の よう に な り ま す 。① の 数 字 が オモ テ 
カー ド の 枚数 , は ウラ カー ド の 枚数 で す 。 

「F 1」「F 2」「F 3」 を 使っ て 出す カー ド の 種類 を 決め ます 。 を その カー ド が な い 時 は 受け 
つけ ませ ん 。 そ の カー ド が , オモ テ と ウラ と 両方 持っ て いる 時 に は , どちら 6 か ら 出 すか を 聞 
いて きま す の で ,「F 1」「F 2」 を 使っ て 決め て て だ さい 。 

カー ド が 決定 する と , 両方 か ら 6 選ん だ カー ド が 走り 出し て きま す 。 

ュ コンピ ュー ター 側 の オモ キテ カー ド を 見 な が ら 作 戦 を た て て 《 だ る い 。 だ たとえ ば, の こり 54 
枚 で オモ テカ ー ド が 4 枚 し か な けれ ば 当然 ウラ カー ド に の こり は あり ませ ん 。 やり方 し だ い 
で は 全勝 も 可能 で す 。 

文 プ ログ ラム の 説明 
30 一 60 マリ オ ・ レ ディ ・ ア キレ ス の スプ ライ ト と ムー プ を 指定 し て いま す 。 
DEFSPRITE | 0 一 2 左 む き 
DEF MOVE 9 一 5 話 む き 
100 一 140 スプ ライ ト を 表示 
各 カ ー ド 初期 設定 

200 一 メオ ン ル ー チ ン 
200 一 280 カー ド の 種類 を 決定 
300 一 400 ウラ か オモ テ か を 決定 

を それぞれ の カー ド を 減ら す 

450 一 500 - コ シン ゼ だ ュー ター の み カー ド 決 定 
550 一 700 選ん だ キャ ラク ター 移動 

勝敗 を 決定 
回 数 が 11 回 以下 な 6200 行 へ 

800 一 899 総合 判定 

900 一 910 残り 枚数 の 表示 と 現在 まで の 勝負 の 表示 の サブ ルー チン 

と ころ が この ブ プログラム, 現在 で は コン ピュ ー タ ー 側 の カー ド 選 択 は 乱数 で 行なわ れ て い 
ます 。2K の メモ リー で は ぎり ぎり の 限 で す 。 

Ver. 3 を 持っ て いる 方, ある いい は, マリ オ や レデ ィ の キャ ラク ター を 使わ な く て も (見 た 
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2B の IF 人 (1 に +2) = の THEN 4 の の 

30M LUCAIE 9.14」1FPRINI ト チラ 2 7 F】1ー オ セア F 2m ウ ラ 
3249 LHLAIE 1SIFRINT 「" "anaLUCATE の 9.15IEINFUT 
HLIF HK1 HK H52 THEN 3 う 10 

さ Z の ウ の IF H=1 THEN 4 の の 

さる 5 の AA(1 。 ド +2) =A(1 。 ド + ジ 2)ー11 BOT 45 

4 の 人 A(1 ドー1 ) = 仙 (1 に ドー1 ) 1 

459 CRKmRND(6) iTF (の CR) く 1 THEN 45 

ら 99 (の CK) =A( の 。CRK)-1nTF CK22 THEN CK に = じ に こく 
らら の Km ドー1 MOVE (KR) 5 MOVUE (CK+ さ ) 

6 PAUBE 1 の の iLHCATE 1 の 9.17』IF KeDK THEN FRKINIT に E キ 
ワ り ケリ gaCY=CY+1 GOUTO 7 の 

61 の IF ( ド K= の aND CRs1) ロ R (K=1 AND CKs2) 0R (Km2 aaN 
D CK ゥ ag) 「HEN PRINT "COMFUTER ! "uaCVCeaCVTI」 BHTU /909 

ら 62 の IF (K= の AND CK=2) ロ R (Rs1 AND CK=2) UR ( ド =2 AN 
D LKa1) THEN PRINT "YHU MIN ! j」YVaYVT1 

/0 り FUBE 15giERA KJCKT3ILOCATE BB .17nFPRINT 「 

aiIF CVTVVTCY て で 11 ITHEN 200 

BQO SBFRITE OFFAuLUCATE の .23』FRINTIPRINTIFRINTaFRTINT 
saPRINTsFRINTiPRINT 

IO 1IF LUV2TYV THEN FRKIIT LUIPUIER MIN MIBUIU 7 ッ 7 
2 1F 7YV2L ソ V IFHIEN PRINTF ' YU U MIN "IiBUTH B77 
AM FRAIUII し に フク 

B ワ 9 PRINIIPRIMNTIEND 

り 09 FUR Ia 1U ZILUUAIE の 01TIY3LFPRINT [ 7 〕J "IRM 
ID)iaLUCATE 20.1+TIMSMPRINT (1.10( LIAR(1 1+ う )」「 
JaPOBTTIODN T 144.210MFUGTTIUN 1+ つ 62 21 の INEXT 
910 LIUATE 7.19.PFRJNT し LOH ~- VHU IILUUAUIE リサ 211FRX 
NT し L ソ VI Ja YUV』 : RETURN 
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目 が 悪く て も ), コン ピュ ー タ ー を も 2 う 少し お 利 日 8 きん に し た だ たい 場合 は , 450 行 を 変え て くだ 
さい (リス ト -2) 。 

ま た , 最初 に 配ら れる ウラ カー ド を 自分 で 選べ る よう に する の も お も し ろ い で し ょ う ( リ ス 
ト -3) 。 


変 数 表 


A(『, ! ) コン ピュ ー タ ー 表 マリ オ 
A(, 1) コン ピュ ー タ ー 表 レデ ィ 
A(8, 2) コン ピュ ー タ ー 表 アキ レス 
A( 有 , 3 ) コン ピュ ー タ ー 裏 マリ オ 
A(』, 4) コン ピュ ー タ ー 理 レ ディ 
A(, 5) コン ピュ ー タ ー 裏 アキ レス 
L___ っ 1 だ と コン ピュ ー タ ー 


K あな た の 出す カー ド 

CK コン シビ ュー ター の す カー ド 
CV コン シン ピュー ター の 勝ち 

YV あな た の 勝ち 

CY 引き 分 け 


坪 or』: 


ょ を る 1 r の } 
? ) の 3e- 


に 
- 挫 9 の っ] 


し 25 な 3 。 
ら ょ = マリ オ ーー = っ ラ に チチ う ロラ 2 ビュ = オモ テ ビ つ = の ラ 
に つと > COMPDUTER 


に ON - YOU ご の ON 。- YOU 
+ ら の 


を ん 
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プロ グラ ムリ スト 2 


469 DK=CKI IF DK>2 THEN DKsDK- さ 

47 の IF RND( ミ ) = R CV+YV+CY>9 THEN 5 の g 

48 の 9 DUsDK+1』TIF DU= ス THEN DUsg 

49 の IF A(1。DU)+(1 DU+S) >m(11PY+EV+YV) / さ THEN 45g 


プロ グラ ムリ スト 3 


14 の 9 FOR Im TO 4』JmRND( さ )+ さ ョ (の 。J) ma( の 。 り ) 1 
15 の LOCATE さ 。123PRINT 【+18 リ マイ メ 。 トド レラ エラ フナ や 
169 LOCATE の 14』PRINT "F1= マ リオ  F2m レ テ " イ 上 さ = アキ レス リ 
1 _。 
179 LOCATE の ,15iPRINT " り msLDCATE 9,155』INPUT 
JsIF 9<1 HR J> さ THEN 17 の 
18 の (1 。J+2) = 人 (1 9+2) 1 
19 の 9 NEXTiLDCATE 9』12PRINT " 

り aaLOCATE 9。14IPRINT " 
saLUCATE の 15sPRINT " F 
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広和 計 衣 到 poooopo な ダ 


を 姜 琶 補 人 を を 


6 の 6 
3 

近 

ら さ う 1 

ま 

8 

1 

ちご の は E 8 

ド ) 

に 1 
| ます つう 1 
1 

3 

* 

H 


宮守 季語 生 到 人 を 


「 ね え , マリ オ 。 今日 の 晩 ざ は ん 何 に し まし ょ うか ?」 

「 う 一 ん , そう だ な 。 カニ が 食べ だ いな 」 

「 あ , それ いい わ ね 。 で も カニ は 高い の よね ー。 そ うだ , マリ オ , ちょ っ と 浜 ま で 行っ て カ 
ー ニ を 採っ て 米 て よ 」 

「 メ ンド クサ イナ ア 。 じゃ 別に 今日 は カニ じゃ な く て も いい や 」 

「 ダ メダ メ 。 マ リオ が 言い だ し た ん だ か ら 。 だ くさ ん 採っ て こない と 晩 ご は ん 抜き よ 」 

「 そ ん な 一 」 

ある 日 の 夕方 , マリ オ と レデ ィ ー の 間 で 上 の よう な 会 話 が あり まし て , 結局 マリ オ は カニ 
を 採り に 行か る れ を そう で す 。 で も 本 当 は あん まり 行き た く な いみ た い 。 あ っ ち へ 行っ た り , 
こっ ち へ 行っ だ り , ふら ふら 6 歩い て いま す 。 ど う や 6, な ん と か し て 逃げ だ そう と し て いる 
み だ い 。 

で も , ここ で マリ オ に 逃げ られ た だ た ら カ ニ が 食べ られ ませ ん 。 そこで, カニ を 採っ て ト ュ ト 
コ 帰 っ て くる マリ オ に , さらに 採り に 行っ て も らい まし ょ 2。 

あっ , ブン プン 飛ん で 〈 く る ハエ さん に は 気 を つけ て 。 レ ディ ー は ハエ が 大 嫌い 。 きわ っ た 
だ け て で 足 が す くん で し ば らく 動け な く な っ て し まい ます 。 ほ ら 6 は ほら 6, その 間 に マ リオ が 逃げ 
ちよ 。 
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ブロ グラ ムリ スト  (BG 画 面 デ ー タ ー は 101 ペ ー ジ ) 


1 の の CLB』CBEN2』CBBET1 , の: BPRITEDN』 VIEM 
11 の DEFMUVE(7) =SBPRITE (2 昌 。1 96。 の 1 ) 

12 の DEFMOVE( 1 ) s*BPRITE (1 , さ 。1 日 。 の 2) 

1 さ 3 DEFMDVE(2) msBPRITE(1」7。1 日 。9。2) 

14 の 9 PALETS 1.。47。4 日 。21 。1 日 

さ の の LOCATE2。BiPRINT "PUSH BTART KEY!" 

31 の IFBTRIG( の ) く >1BDTD さ 1 の 

さ 2 の ML=2』9C=g』 Bm 1 の の の VIEM: BUBUB さ OBDSUB さ 1 の! GOSU 
B さ 2 の 

4 の 9 の X=RND(129)+16』 YRND (5 の ) +1 の iMmRND (2) *6+2IERN1 。 


の 


41 の Ms の Cs の iD=1 BUSUB111 の 
429 PHBITIDN1 。16』176』 MDVE1 

43 の FURI= さ TH6』POBTITIDNT , の 。 の 』ERAT NEXT 

5 の G=STICK(g) 』 IFB=URB >20RM> の ORMDVE (D) BHTD5 さ の 

1 の IFD<>B THENERAD』PHSITIDNB , XPHS(D) 。176』 D=G 

2 り IFNUT((D=1ANDXPOB(D) =144) DR (Ds2ANDXPOB(D) =16) ) 
THENMDVED 

55 さ の IFMUVE(@) GBDTO57 の 

549 IFYPUB(@) >174THENFDBTTIDNO , XPHB (の) 。176』 BOTD25 の 
の 

5 の IFYPOB() <26THENPDBITTHN ウ 。 XPDS (の ) ,24』Jm の BOBUB 
1 1 の 9: BODTO57 の 

品 6 の BUSUB1 の の の 

紀 79 IFABB(XPDB(D) XPDS( の ) )<16ANDABS (YFHB(D) -YPDB (の 
) )<16 BUSUB2 の の 

5B FURI=3TD6 
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文 遊 び 亡 


リス ト を 全部 入力 で きた ら 6 RUN し まし ょ う 。 
PUSH START KEY/ 
と 表示 が で まし た か ? で た ら コ ント ロー ラー 1 の スタ ー ト ボネ シン を 押し て (だ きい 。 を そう 
する と ゲー ム が 始ま り ま す 。 
画面 の 下 に レデ ィ ー が 表示 きれ まし だ た ね 。 こ の レデ イィ イー は コ ユ コントロー ラー1 の 十字 ボタ ン 
を 使っ て 左右 に 動か せま す 。 
あと は ブロ ッ ク く くず し の 有 要領 で す 。 上 の 方 で 動い て いる カニ を マリ オ が 採っ て きだ ら , レ 
ディ ー を うま 動か し て ハネ 返し て 《 く だ きい 。 ブ ロッ ク く くずし と 違っ て , カニ を 採っ て きた 
マリ オ を ハネ 返る な いと 得点 は 増え を ませ ん (を そう し な いと カニ が 受取 れ な いで し ょ ?)。 点 
数 は カニ 1] 了 匹 に つき 5 点 で す 。 
レデ ィ ー が ハエ に ふれ る と し ば らく 動け な く な り ま す 。 
マリ オ に 3 回 逃げ られ る と ゲー ム オ ー バ ー で す 。 
文 ブ ログ ラム の 説明 
プロ グラ ム の 構成 は 次 の よう に な っ て いま す 。 
100-- 初期 設定 
500-- メイ ン ル ー チ ン 
1000-- マリ オ 反 射 
1500-- カニ 採集 
2000-- カニ 受取 り 
2500-- マリ オ 逃 げ る 
3000-- 得点 な どの 表示 用 
4000-- GAME OVER 
以上 の よう な 処理 の 中 で 一 番 重要 で や や こし い マ リオ 反射 の 部 分 を 中 心 に 説明 し ます 。 
長 や カニ に マリ オ が ぶつ か る と 。 光 と 同じ よう に 反射 し ます ( 図 参照 )。 左 右 の 壁 で 反射 す 
る 場合 の 処理 が 1000ー で , 上 の 記 や カニ で 反射 する 場合 は 1100 一 の 処理 を 行ない に ます 。 マリ 
ォ の 移動 方 向 は 変数 M に 入っ て いま すか ら , 反 射 し た あと の 方 向 は 1000 行 や 1100 行 の よう な 
論理 式 を 使っ た 式 で 計算 で きま す 。 問題 は , 反射 し て か ら 6 次 の 記 に ぶつ か る まで の 移動 距離 
で , これ は 簡単 な 計算 式 に は で き な い の で , 1010 一 1050 行 や , 1110 一 1155 行 の よ う に 方 向 別 
に 計算 し て , 変数 し に モッ ト し ます 。 M と 革 が 決ま っ た ら 1160 行 で 新しい 移動 方 向 と 距離 を 
定義 し て , 1170 行 て 動か し ます 。 
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ら 59 の TIFABG(XFOUS(1) XFPOS( の ) ) で 16ANDABB(YFUS(T)-YFOS(g の 
)) く 16 THENELARY "CO "TiBOUSUR 1 5 の の 

6 の 9 の IFXPOS(1 ) = の GO0SUE1555 の 』 GOTO620 

619 IF NOUIF MUVE(T) HENERATIFOBITIUNI の り の 

ら 6Z の のり NEXT 

ら 63 の IFABS(XPUS(D)-XFUHS(7) ) く 16ANDABS (YPUB(D) -YPUB(/ 
)) く 16THENM=M+TS2S』FOSTITTON ブ 7 ジン 5 こら 9 

649 IFNUT PUVE(/Z) 1HENPHBITIIUNZ 」RND(129)+16. の り 』FIHVE / 


65g IFM>@THENMmM-1 
66 BHTD5 の 9 

1 の の =ー(N=2) % 日 (Mi 日) %2ー(Mm4) *6ー(Mm6) *4』 XmXPHB(@) 』 
Y=YP08(@) 

1 の 1 の IF NM=2 0R MsB GOTO149 

1929 IF Y<4 昌 THENL=128』 BHTO1169 

193 し =176-Yi GBDTD116 の 

1949 IF Y>152 THENL=12: GUTD116 の 

195g L=Y-24』G0TO116 

1 1 の の M=ー(M=2) x4ー(MmB) 6ー(M=6) *Bー(Mm4) 2 XmXPDB( の ) 1 
Y=YF0S(@) 

1119 ON M/2 BOT ロ 1129。1139,1149。115 の 

1129 IF 144-X ぐ Y-24 THEN L=144-X』BOTD1156 

1125 LmY-24』 BOTO1 1556 

11 さ の IF 144-X<176-Y THEN Lm144-XiBOTD1156 

1135 L=176-YIBOTO1156 

1149 IF X-16<176-Y THEN LmX-16』 BUTH115B6 

1145 Lm176-Y』GHTD1156 

1159 IF X-16<Y-24 THEN LmX-161G ロ TO1156 

1155 L=Y-24 | 

116 IFL く 2THENMmー (MX 呈 ) *6-(M25) *4』 BOTO1 110 
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メイ ン ル ー チ ン は , キー 入力 と レデ ィ ー の 移動 (500-520), マリ オ の 状態 チェ ッ ク 
(530-570), カニ 移動 (580 一 620), ハエ 移動 (630 一 640)0 の よう に な っ て いま す 。 

を それ ぞ れ の 移動 処理 の 中 で 他 の スプ ライ ト と の 衝突 を 調べ , 意味 の ある 衝突 で て あれ ば 各 処 
理 を 行ない ます 。 こ の 処理 は , 1500 (マリ オ と カニ ), 2000 (マリ オ と レデ ィ ー), 630 (ハエ 


と レデ ィ ー)) の 3 種類 で す 。 


文 変 数 表 
D レデ ィ の 移動 方 向 
M マリ オ の 移動 方 向 
L マリ オ の 移動 距離 (ドッ ト ) 
マリ オ が 持っ て いる カニ の 数 
W レデ ィ が 動け な い 時 間 
ML マリ オ の 数 
CC 寺 当 デ 
HS ハイ スコ ア 


デ タイ ト 


1170 行 


比 。 120 一 130 行 
3 一 6 三 1550 行 

7 と 110 行 
マリ オ の 移動 方 向 


6 4 
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1 169 DEFMDVE (の) *SPRITE( の 』M。 1 。L/2。 の 4) 
1179 PUBITIUN 。X 。Y』 MOVE』 RETURN 

15 の 9 の IF I=J THEN RETURN 

151 の C=C+1:GDSUB1 1 の 

1529 J=IiERQT:PUBITIUNT , の iRETURN 

155 の H=RND(2) *4+ さ 』 IFRND (は) > の THENRETURN 

156g DEFMOVE (1 ) =sSBPRITE(14。H。RND ( さ ) +1 64。 の , さ ) 
157 の POBITIODNT 。-(H= さ ) *16ー(H=7) *144。RND (57) +24 』 MVE 
1 iRETURN 

2 の の の IF 1T=J THEN RETURN 

2 の 1 の J=I:GOSBUB1 1 の 9: TFC= の THENRETURN 

2 の 2 の BC=BD+C 呈 』 GUSBUB さ の の じ = の 

2 の さり IFBC>=B THENML=ML+1』 BmB+1 の の の 』 BUBUB さ 1 の の 
2 の 4 の RETURN 

25 の の PLAY"C2DCD"』MLmMLー1: BODSUB さ 1 の 

251 の 9 IFML<OBDTD4 の の の 

2529 BUTD4 の の 

3 の の の LUCATE19』7』PRINTBCDI RETURN 

さ 1 の の LOUCATE29 19』PRINTMLI" "RETURN 

32 の 9 の LUCATE19.3kPRINTHB』 RETURN 

49 の の LUCATE5。 呈 iPRINT "BAME OVER" 

4 の 1 の IFSC>HB THENHSB=SCI BUSUB さ 2 の 

4929 BUT ロ さ の の 
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ライ フ ゲ ー ム と いう の は 15 年 ほど 前 に アメ リカ の コン ウェ ー 博 士 が 考案 し た も の で , ゲー 
ム と いう より は シミ ュ レ ーション に 近い も の で す 。 これ は ,。 ある ルー ル を 定め 。 その ルー ル 
の も と で 生物 が 誕生 , 生存 , 死滅 する の を シミ ュ レ ー ト する も の で す 。 特に コン ピュ ー タ ー 
用 と し て 作ら 5 れ だ も の で は な い の で , コン ビ ピュー ター な し で も 楽し む 事 が で きま す 。 

ゲー ム は マス 目 の 上 で 行ない ます 。 マス 目 の 大 きる は 理論 的 に は 無限 大 で びな く て は いせ サ ま 
せん が , 実現 不可 能 で すか ら 好 き な 大 きる を 決め ます 。 後 で 説明 する パタ ー ン を すべ て 楽し 
びに は 最低 で も 100X100 の マス が 必要 だ と 言 われ て いま す 。 

ライ フ ゲ ー ム の ルー ル は 次 の 4 つ だ け で す 。 

まず , ある 1 つの マス 目 に 関し て , を その 周囲 の 8 個 の マス に コマ (生物 を 表わし ます ) が 
ある か を 調べ で , コマ の 数 が , 

① 3 個 で 。 か つ ,。 まん 中 に コマ が な い 時 に は , まん 中 の マス に コマ を 置き ます (誕生 )。 
② 2 , 3 個 な ら ば , まん 中 は その まま (生存 )。 

③ そ れ 以 外 (1 個 以 下 か 4 個 以 上 ) の 時 は , まん 中 の コマ を 取り 去る ( 死 減 )。 

④ 以 上 の ルー ル に し た が っ て , すべ て の マス 目 を 同時 に 変化 きせ る 。 

①<③ の ルー ル は , 生物 が 生存 し て い 〈 く に は 適度 な 環境 が 必要 で , 誕生 の た め の 条 件 は る 
ら に きび し て く , また , 生物 が 少な すぎ で て でも, 地学 き て も 死 減 し て し まう こと ちゃ を 表わし て いる 。 


62 ファ ミコ ン ソ フト 集 001 


プロ グラ ムリ スト 


1 の の CBEN さ 』SBFRITE NiCLS 
11 の DEF BPRITE の 。( の 9。 の 9。 の 9。 の の) = リリ 
12 の 9 PALET B の 。47。4 日 」 さ さ 。22 
1 さ の PRINT "リリ ドン ノ オオ キサ ラ キメ テ の 9" サ イリ 
14 の 9 INFUT "ヨコ ( さ -2B) "IMX 
15 の IF MX< さ DR MX>2H BOT 14 の 
16 の 9 INPUT "2 テ (ミー-24)"』MY 
179 IF MY3 OR MY>24 BOT 160 の 
18 の 9 DIM (MX-1 ,MY-1 ) 
5 の の X=MX/2kY=MY/2』CLB 
1 の SBFRITE の 。X#B+16』Yx 日 +24 
2 の BsGTRIB( の ) 
さく の IF B=1 BOTO 1 の の の 
呈 4 IF B=4 THEN LOCATE X。Y』PRINT CHR$(297) 』』GOTO 


5 IF SB=B THEN LOCATE X。YaFRINT " "I 
6 の SB=STICK(@) 

79 IF =1 THEN Xs(X+1) MOD MX 

5B の IF Bm=2 THEN X=(X-1+NMX) MOD MX 
呈 9 の IF B=4 THEN Y=(Y+1) MOD MY 

6 の の IF Bs=B THEN Y=(Y-1+MY) MOD MY 
61 の SFRITE の ,X% 昌 +16,Yx 日 +24 

62 の FOR I= TO 2ggiNEXT 

6 さ の BOT 52g 

1 の 2 の BPRITE FFP= の 』G= の 

1 の 1 の FOR X= TU MX-1 

1 の 2 の 9 FOUR Y= の TO MY-1 

1 の 3 の IF ABC (SCR ま (X。Y) ) =27 THEN AA(X。Y) =1』PmF+1 
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この ルー ル さ る え 守 れ ば コン ビュー ター な し て も 実行 で きま す 。 だ めし に や っ て みる に は 碁 
盤 か オセ ロボ ー ド が 便利 で す 。 コ ンピュータ ー を 使わ な い 時 に 間 題 に な る の は , マス 目 の 数 
と 条件 の ④① で す 。 実際 に や っ て みる と わか り ま す が , 順番 に 変化 きせ て いけ な い の で , まず 
すべ て の マス を チェ ッ ク し て 誕生 , 死滅 を マー ク し て いき , チェ ッ ク が すべ て 終わ っ て か ら 
変化 きせ せな く て は な ら な いわ け で すか ら , マス が 20※X20 位 に な る と か な り 大 変 に な り , 100※ 
100 な ん て や る 気 も な こり ませ ん 。 

実は 。 これ は コン ピュ ー タ ー を 使っ て も わり と 大 変 で , 特に ベー シッ ク を 使う と スピ ー ド 
の 問題 が ある の で す が , まあ な が め て いれ ば いい わけ で すか ら 人 力 よ り は る か に 楽 と いえ ま 
す 。 し か し 今度 は 広 さ の 問題 が び ど び て きま す 。 フ ァ ミ リー ベー シッ ク を 使う と マス 目 は 最大 で 
も 28X24 し か と れ ま せん か ら , この 範囲 で 楽し め る 事 を 考え を な く て は な り ま せん 。 

ライ フ ゲ ー ム の 楽し み は , 広い 範囲 に コマ を バラ まい て , 時 間 が た つ に つれ て コマ が 繁殖 
し て いっ た り , 突然 減少 し て し まっ た りす る 変化 を 見 る 事 の 他 に , 色々 な パタ ー ン を 発見 す 
る 事 に あり ます 。 こ れ は アメ リカ で は か な り 研 究 る きれ て いて , 色々 と お も し みろ い パ ター ン が 
知ら れ て いま す の で , その 中 か らい くつ か を 紹介 し て お きま し ょ 2 う 。 

パタ ー ン は いく つか に 分 類 で き , まっ た だく 変化 し な いも の や , 一 定 の 周期 を 持っ て 同じ 変 
化 を くり 返す も の , パタ ー ン が だ ん だ ん 移動 し て いく も の な ど が あり ます 。 中 に は ふ だ つ の 
2 パタ ー ン の 間 を 別 の パタ ー ン が 往復 する と いう すご い パ ター ン も 研究 きれ て いま す 。 


文 プ ログ ラム の 使い 方 


ブロ グラ ム が 始ま る と , まず マス 目 の 大 き さ る を 入力 し ます 。 ョ ヨコ (3 一 220 マス ) タテ (3 
<20 マ ス ) 以内 で 入力 し ます 。 必要 も な い の に 大 きく する と , を の 分 遅く な り ま すか ら , 必 
妥 最 小 限 の 大 きる に し まし ょ う 。 た と えば 「 ブ リン カー」 を 見 た いな ら ば 5X5 マ ス で 十分 
0 の 

次 は ,。 パタ ー ン の セッ ト で す 。 画面 に “ 十 " が で ます が , これ が カー ソル で す 。 コン トロ 
ー ラ ー [で カー ツル を 動か し ,B ボタ ン を 押す と コマ が セッ ト さ る され ま す 。 間 違っ た 時 は A ボ 
タン で 消す こと が で きま す 。 

2 パターン が セッ ト で きだ た ら 6 START ボタ ン を 押し て くだ さい 。 あと は パ マター ン の 変化 を な 
が め て いま し ょ う 。 

画面 の 下 に 出 て いる の は , 

GEN 何 周期 目 か 

POP 入口 , コマ の 数 で す 

MAX ロ _ それ まで の 最大 入力 で す 
や め た だ た い 時 は STOP キー を 押し て くだ さい 。 
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1 の 4 
1 の 5 の 
1 96 の 
1 の 7 の 
1 2 の 
1 の 9 の 
1 1 の の 
1 1 1 の 
1 1 2 
1 1 さ の 
1 14 の 
1 15 の 
1 1 6 の 
1 1 /g 
1 1 の 
1 19 の 
1 2 の の 
2 の 

1210 
122 の 
12 さ の 
1 24 の 
MFI 

125 の 


NEXT』 NEXT』 MP=P 
FUR CX= の TH MX-1 

FOR CY=g TU MY-1 

N= の 

FUR 1=-1 T 1 

X=(CX+I+MX) MOD NX 

FOR Jm-1 TO 1 

Y=(CY+J+MY) MOD MY 

IF ABC(BCR$(X 。Y) ) s297 THEN Ns=N+1 
NEXT』NEXT 

IF Ns THEN A(CX。CY) =1』BOTD 116 の 

IF N<>4 THEN A(CX。CY) = の 

NEXT』NEXT 

P=g 

FOR Xsmg TU MX-1 

FDR Ys=@ TO MY-1 

IF A(X。Y) mg THEN LUCATE X』Y』aPRINT " 


LUCATE X』YiPRINT CHR$ (27) 』』PmP+1 
NEXT』NEXT』 BsB+ 1 
IF P>MP THEN MFP=F 


"agBOTO 1 


LUCATE りり .23UFPRINT GEN'IOD」 '′ POUEF IF 」 7 PF 【 


GUTOU 1 の 30 の 
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文 プ ログ ラム の 説明 
人 で 100 一 180 行 ' 

初期 設定 で す 。 マス 目 の 大 きる も ここ で 入力 し ます 。 ヨ コ ュ の 大 きる は 変数 MX, タテ は MY 
に モッ ト し ます 。 
@500--630 行 

コマ の セッ ト 部 で す 。 コ ユ コントローラ ー か ら の 入力 を 調べ で 。 それ に し た だ が っ て カー ソル る 動 
か し た り 。 コマ の セッ ト 。 消 去 を 行ない ます 。 
で 1000 一 1040 行 

ゲー ム の 準備 で す 。 配列 A (人 , Y) は ゲー ム 艦 の コピ ビー, 座標 (X, Y) に コマ が あれ ば 
1 な けれ ば 0 に セ モット る され ま す 。 変数 P は 全体 の コマ の 数 (人 日 ) で す 。 
@1050 一 1160 行 

マス 目 の チ ェ ッ ク で す 。SCR$ で BG 画面 を 直接 調べ , 変化 が ある 場合 は 配列 A の 方 を 変え 
5 

ある マス 目 (CX,CY) の 周囲 8 マス の チェ ッ ク を し て いる の は 1070~1130 行 で 。 1090, 
1110 行 で 調べ る 座標 の 計算 に MOD を 使う こと に よっ て , ゲー ム の 艦 の 上 下 と 左右 を つない 
て "ます 。 
で 1170 一 1220 行 

配列 A の 内 容 を BG 画面 に コピ ビー (表示 ) し ます 。 


以上 050 行 以降 ' を ひたすら 6 く 《 り 返す わけ で す 。 
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よ し, 次 は 第 3 チェッ クボ ポ イント だ 。 ち ょ っ と 遠い な 。 
オォ オット, スペ シャ ルフ ラッ グ だ 1!! し か し 方 向 が 完全 に 反対 だ な あ 。 取り に 行く べき かど と 
う か …。 あーあ , 考え て いた だ たら 消 を ちゃ っ た 。 残念 1! 


文 ゲ ー ム の 説明 


コ ュ コントロー ラー を 使っ て 運転 し て , 0 一 9 まで の チェ ッ ク ポ イン ト を 順番 に 通過 し て くだ 
さい 。 各 チェ ッ ク ポ イン ト を 通過 する と 1 ケ所 に つき 10 点 加算 され ます 。 

寺 々 画面 に あら われ る ハタ は スペ シャ ルフ ラッ グ で , チェ ッ ク ポ イン ト と は 関係 な く , 通過 
する と その 時 の 残り 0 FUEL の % が ボー ナス と し て 加算 され ます 。 こ れ は 一 定 の 時 間 が た つと 
消え を て し まい ます か ら , すばやく (取り に 行っ て くだ さい 。 

すべ て の チェ ッ ク ポ イン ト を 通過 する と ゴー ルイ ン 。 残り の FUEL が 得点 に 加算 る れ ま す 。 

途中 て FUEL が 0 に な る と 燃料 切れ で ゲー ム オ ー バ ー で す 。 


文 遊び 方 


プロ グラ ム を 走ら せる し と, 
PUSH START BUTTON/ 
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プ ブログ ラム 、 リ スト  (BG 画 面 デ ー タ ー は 102 ペ ー ジ ) 


1 の の DIM DX(Z) 。DY(Z) 
11 の FURI= の TO DEFMUVE(T) msSFRITE(6。 TX ジ キ 1 。 ジ 4。 の 4 の) gN 


12 の FURI=2TO7』READDX(1) 。DY(1) 』NEXT 
13 の DATA 0。-1、1 と 4 多 2、 1 12. の 92。-】1 。1 1 。g 

14 の CBBET1 。 1』HBm』 BPRITEON』 CLB 

2 の BC=iFU= の の 』FL= の 』N= の Hm の IDHm ロ iL し =FU-5 の 

1 の CX=12CY=12aPODBITIDN 日 。112。12 ロ 

29 LUDCATE5。19』PRINT"PUSH BTART BUTTON !" 

さ の IF STRIB( の )<>1 BUTD2 さ の 

VIEM』FURT=TD9 

X=RND (26)+1』 YmRND(19)+1 

27 の IFSCR も (X』Y) く 20 "BOTO26 の 

28 の 9 LODCATEX 。YaPRINTHEX$(1) nNEXT 

299 LOCATE15。21』PRINT"HI-BCORE"』 HB 

5 の の SB=STRIG( の ) /4』H=(DH+ (Bm1)-(B=2)+4) MDD4』 IFMDVE ( ロ 
H) BUT05 の の 

1 の AAGC(SCR ま (CX+TDX(H2) 。CYTDY(H*2) ) ) 』 BBC (BCDR 和 ( 
CX+DX (H2+1 ) 。CYTDY(H*2+1 ) ) ) 

2 の IF Q= さ 2 AND B= さ 2 GOTIB5B の 

5 さ の IF =25 さ OUR Bm25 さ BOT 62 の 

5 の IF (Am さ 2 AND Bm199) DR (Am199 AND Bs さ 2) BOBSUB1 
1 9 の 9: BHTD5BO 

69 IF (-4BmN AND Bm さ 2) ロ R (nm さ 2 AND B-4BsN) BOBU 
B129 の 』 GUTU5B の 

6 呈 IF A-4B く <>N ロ R B-4B く SN BHT ロ 620 

57 の 9 BUBUB12g の 』 GUBUB1 1 9 の 

5Bg IFMOVE(DH) BDTOEB の 


四 
1 


6 
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と 表示 が 出 ま すか 565,。 コン トロ ー ラ ー の スタ ー ト ボタ ン を 押し て くだ さい 。 

画面 に 0 一 9 の 数 字 が 表示 る され ます が , これ が チェ ッ ク ポ イン ト で す 。 

同時 に 車 $ 表 示 る れ 動き ど し ま すか ら , この 車 を コン トロ ー ラ ー を 使っ て 運転 し て くだ る 
MT。 
運転 の し か だ は , コン トロ ー ラ ー の A, B の ボタ ン を 使い ,。 A ボタ ン を 押す と 車 は 右 に ま 
が り 。 B ボ タン を 押す と 左 に まがり まず ま 。 

ゴー ルイ ン す る か , 時 間切 れ で ゲー ム オ ー バ ー に な る と , 画面 に あな だ の 得点 が 表示 され , 
再び 最初 の 画面 に 戻り ます か ら , 続け て 遊ぶ 場合 は スタ ー ト ボタ ン を 押し て くだ さい 。 
文 プ ブロ グラ ム の 説明 
人 初期 設定 (100 一 290) 

画面 の 初期 設定 や .、 スプ ライ ト の 定義 デー タ の 読み 込み , 変数 の 初期 化 な が ど を 行ない ま 
す 。 燃料 の 量 を 変え た た い 人 は 200 行 の FU=500 を 変え て くだ きい 。 

チェ ッ ク ポ イン ト の セッ ト は , 250 一 280 行 で す 。 

@ び メン ルー チン (500650) 

コン トロ ー ラ ー か ら の 入力 チェ ッ ク と 車 の 移動 を 行ない ます 。 

車 の 進行 方 向 (0 一 3) は 変数 OH に モッ ト る され て いま す 。 これ に 対し て 新しい 進行 方 向 は 
変数 HH に セッ ト し ます 。A, B ど ちら の ボタ ン も 押 き る れ て いな けれ ば =OH で す 。H が 決 
まっ た だ た ら を の 方 向 の 前 方 の 座標 に 何 が ある か を 調べ ます 。 つ まり 車 の 進路 上 に 何 が ある か を 
調べ て , を その コー ド を 変数 A, B に セッ ト し ます (510 行 )。 調 べ る 座標 は 当然 日 の 値 に よっ 
て 違い ます か ら , 車 の 現在 位置 (CX, CY) を 中 心 に , どこ を 調べ され ば いい か は 配列 DX (HH), 
DY(H) と DX(H 十 1), DY(H 二 1) に セッ ト る れ て いま す 。 こ れ に よっ て 是 に 関係 な 〈 調 
べ る 座標 は , 

CX 十 DX(H), CY+ DY(H) と , 

CX 十 DX(H 二 1), CY 十 DY(H 寺 1) 
と いう 式 で 表 わ せ ます 。 これ で 車 の 前 方 に 何 も な い 時 は , 車 を 移動 きせ ます 。 何 か あっ た 場 
谷 は , それ が ハタ な ら 1100 行 , チェ ッ ク ポ イン ト な ら 1200 行 の 処理 を 呼ん で か ら 車 を 移動 き 
管 ま す 。 

メイ ン ル ー チ ン を 1 回 まわ る 間 が 1 単位 時 間 で , FUEL を 1 消費 し ます (620 行 )。 こ れ で 
FU=0 に な る と 燃料 切れ で ゲー ム オ ー バ ー で すか ら , 1600 行 に 飛び ます 。 

但 ス ペ シ ャ ル フラ ッ ク 処 理 (1000 一 1100) 

1000 一 1040 行 が ハタ を 書い た り 消 し た りす る 部 分 で , ハタ が 出 て いる 間 は 変数 FL が -1 に 
セッ ト る れ ま す 。 ハタ の 座標 は 変数 FX, FY に セッ ト し ます 。 
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ら 7 切 

6 の の 

61 の 

6155 

ら 62 の 

ら さ の 

64 の 

ら 650 

1 の の 
1 の 1 の 
1 9 の 
1 9 さ の 
1 ウ 4 の 
1 1⑦ の 
TURN 
1 2Z の の 
+ ン 10 
JNI 
1 ZZ 
12 さ の 
124 の 
15 の 
15 ら 1 
1 6 の の 
1610 
1 6Z の 
1 6 さ の 
164 の 
1 65 の 
1 66 の g 
17 の の 


IF 0DH=H GOTO 619 の 
PUBITIONH。 XPDS (OH) 。YPDS(DH) 』ERA ロ H 
MVE Hi ロ H=H 
CX=CX+(Hm さ ) (Hm1) iCY=CY+ (Hm の) (Hm2 ) 
FU=FU-1』 IF FU<1BOTU16 の の 
IF FU<L BUSUE1 の の の 
LUCATE の 9,21』PRINT "FUEL"mFUI" " 
BOT 5 の の 
L=L-5 の 』 IF FL BOTO1 の 4 の 
FX=RND(26)+1』FYmRND(19)+1 
IFSBCR$(FX』FY)<> う リリ THENFL=iRETURN 
FLm-1』LUCATEFX 。FY』PRINTCHR も (199) 』 RETURN 
LOCATEFX 。FY』FRINT" "FL の 』RETURN 
LOUCATEFX 。FY』PRINT" "』BCmSC+FU/1 の 』 BODSUB17 の の 』 RE 


BC=SC じ +1 の GUSUE17 の の 

IF ロー-4BmN TIHEN LUCAITELXTDX(H2) 。 じ YTDY(FHK2) 」 ビ R 
HUTU1 2 うり 

LUCATE じ DX+DUX(HY2T1) LTUDT(HI2TUDINFDRKINIT 
N=N+1aTF Nm12 BUTU1S5 の 0 の 

RETURN 

ERA OHILUCATE1 の 5bPRINT'FINTIGHI | 15 じ =5C+FU 
GOSUR1 7 の: GOUTO1 6 

ERA JH 

LUCUATE SO OUFRINT TIIEL UERI] 

LUDCATE 2.6jFRINT'VYVUUR GEDURE 1D 1190 し 」 FOINO 
IF BC<mHS GOUTOU16S0 


LUCLATE ら 。ZuPRINTTTT 8 LUUSE RELURDI IIHBeE( し 
LULAIE ロウ IPRJNFI IRY ADNINI | 

GOUTOU の 

LUCATEO.2ZZIFRINI BUURE IBLI IKETURN 


ラリ ー 


71 


1100 行 が 車 が 通過 し た 時 の 処理 で , FU の % を 得点 に 加算 し ,. ハタ を 消し ます 。 
チェ ッ ク ポ イン ト 通 過 処 理 (1200 一 1240) 

得点 に 10 点 加算 し て , チェ ッ ク ポ イン ト の 数 字 を 消し ます 。 最 後 の チ ェ ッ クボ ポイ ント (9 
番 ) が 消 を た ら , 1500 行 か な ら の ゴー ルイ ン 処 理 に 飛び ます 。 
@ ゴ ー ル イン , 燃料 切れ (1500 一 1660) 

ゴー ルイ ン の 場合 は 残り の FUEL を 得点 に 加え ます 。 

得点 を 表示 し て , ハイ スコ ア の 更新 を 行ない , 200 行 に 飛び ます 。 


文 変 数 表 
CX, CY 車 の 位置 
OH, H 車 の 進行 方 向 


FU 残り 燃料 

FX, FY スペ シャ ルフ ラッ ク グ 位 置 
N チェ ッ ク ボ ポイ ント 番号 
SC 大 コア 

HS ハイ スコ ア 
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ファ 二 コ ツク の 〇 りり U 


コン ピコ ー マ ー に は 上 9 そ の 縛 有 能 に な る チッ プ ( 右 と も いう ) が ガ あ る 。 ' し 
じ り 」 と が ガ 「MPU」 と 呼ば れる も の だ 。 

日 本 の 8 ピッツ ト の パソ コン は 今 ま で ほとん ど が 「Z8 の 9」 か 「68 の 9」 を 
本 5 ら て し だ 。 ビ ロー8001、 68600 や Xー 1 や MZ シ リー ズ グ 「280」FM- 
/ や ロー 1 は 「68 り 9」 を ほっ て いた だ 。 

ご どこ ご ころ で 。 ! アッ プル 」 こ し うつ コレ ピコ ー ツ ー を 知っ つく し いる お が 。 あ の 「 
ー ド ラン ナー 」 な ん ガ カ ガ 色 の め て 走 つ だ / メ リカ の コン ピコ ー ツ ター だ 。 こ の 「 ア 
ソ プ ブル 」 は 「65922 」 と いう OOPU を 使っ て し いる ん だ 。 

っ まり ,。 8 ピッ ソト の 0 ソ CFU で は 「60」 と こと 63220 」 と 0592」 の 
三種 類 が 世界 の 主流 ど つ だ を わけ だ 。 

この ファ ニコ ン , 実は 「6592 」 の カス マム / ( 知 別 骨 ) チリ ソ フ を 作 つ てい 
る つ 。 

「6592」 と いう CPU 自体 は , 他 の 2 つ に 比べ る こと 少し 性 能 が 悪い けど , 
良い 点 も いろ いろ あっ て ,。 ゲー ム に ヒビ は ちよ うど いい CPU と いう 人 も いる 。 占 
より , 名 機 「 ア ウッ プル 」 が そ れ を 証明 し て いる だ ろう 。 

パソ コン を 持つ て い ば つ て る 友達 に 。 「 ば ぽ ば こ の は アソ ノル と 和 癌 じ で 50 
の を 合 つ て る ん だ 」 と 戸 つ て みよ う 。 でも, 問 還 つて も 「 ろ こせ ん ここ ひで や ぐに. 
な ん て いわ な いよ うに 。 プ ログ ノラ マー 全 間 て で は 「 ろ ぐ ご ーー まる に 」、 と 呼ば な け 
れ ば いけ な いん だ 。 ち な み に 「 選 8 り 9」 は 「 ぜ つと は ぢ まる 」 ま だ は 「 ぜ つば 
ち 」'6899」 は 「 ろ ゐる ぐ こ は ちあ まる こく 」 ガ 「 ま る ぐ 」、 と ん だ 。 


ラリ ー 


Z3 


SG ZN R 
きび うに っ a- ン TO っ 、 きこ シン 


ルー と 今度 は 誠 だ あう 。「SEIKRO」 か 。 ん 一 S は と ど とこ だ 。 ラ ちっ, あん な 通 く か 。 えっち 
ら お っ ち ら 6, あ 、 まず い 。 あ いつ も S を 狙っ て る 。 ど っ ち が 早 いか 。 お っ と いけ な い , 間 違 
っ て 違う 文字 を 拾っ ちゃ っ だ 。@ マ ー ク は どこ か が な …。 
文 ゲ ー ム の 説明 

この ゲー ム は 2 人 で 遊ぶ カル タ 取 りみ た いな ゲー ム で す 。 2 人 が それ ぞ れ “* と ご 十 
印 の , 何やら シャ クト リ 虫 の よう な や つ を コン トロ ー ル し て , 指示 され た 単語 (名 前 ) の 文 
字 を 順番 に 拾い 集め ます 。 

文字 は 順番 に , た と えば 「SEIKO」 な ら ば S か ら 6 順に, EK, I, … の よう に 集め て いき ま 
す 。 途 中 で 間違っ て 関係 な い 文 字 を 拾っ て し まっ だ た とき は , @ マ ー ク を 探し て 拾っ て くだ る 
い 。 この 文字 は , キー ボー ド の “DEL キー の よう な も の で , これ を 拾う と を の 前 に 拾っ 
だ 文字 を ひと つ 消 せま す 。 

間違っ た の を を その まま に し て どん どん 拾い 続け て し まい , 指定 され た 名 前 の 文字 数 より 多 
く 《 な っ て し まう と , せっ か く 〈 拾っ た 文字 が 全部 (その 名 前 の 分 どけ で す ) 消え を て し まい ます 。 

ひと つ 名 前 が 完成 する と , 次 の 名 前 が 表示 され, 先 に 5 人 の 名 前 を 集め た 方 の 勝ち で す 。 
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プロ グラ ムリ スト 


1 1 の 


DIHN CX (1) 。DY(1) 。TX(4).TY(L) HCLU) 、M(1) N16 (1) 1 


< 呈 (1 ) 。 じ ま (1) 。 NR 生 (/) 


1 2 の 
1 3 


FURT=2TOUZ7I REARDNA ま (T) NEXT 
DRTR SEIROU。HIROMT JRRKINR NAOKO YUETRKO MONOKOU』 AT 


SUM1I 。MaTKO 


1 4 の 


し も (の) ョ "リル 』 し も (1) = + リ 

H( の ) =BiN1 ま (の ) NR 和 (RND(B) ) (の) = らら 
H(1)=BiN1 ま (1 ) NR まま (RND (BB) ) i (1 ) = 
CLSsFORT=64TO9 
X=RND(26)+1』 YmRND (人 22 ) 
1FBLR も (XY7) く 2 BHTU2409 
LULAIEX。、YLPRKINT し HK 生ま (I)uNEXT 
FURF=TOU1 3 GUSUE2O の GUSUERSS2 NEXT 
FURF=@TOU1 

ら =STICK(FP)j TIFS=THENS=H【(F ) 

人 = し 人 (PD) 1 Ye し Y【(P) 

IFS=1THENX= (CX(P)+1) MOD2BI GOUTOS6 の 
IFG=2THENX= (CX(P)+27) MOD2B GOTO5S60 の 
IFS=4THENY=(CY(P)+1) MOD22 ェ BOTOS60 の . 
IFBEBHTHENYE( じ YY(F) イ 21) HUD22 

内 征 BCUR 征 (XY) 

IF 内 本 モ リキ OR 人 も m "KTGOUTOUZ5 の 

し X(FP7mXILY(FOSYILUUCATEX YLFRIMT 1 「』 
IF 人 A も = リリ "BOT 68 

IF も お am"G THENN2 も (F)=LEFT も (NZC も (PF) 。LEN(N2 ま (PF ) ) 一 1) 


s GUTOU62 


61 の 
ら 6 の 


N2 も (P) NO も (ドド ) 十 谷 外 
IFLEN(N1$ も (P) ) く LEN(N2 ま (P) ) THENN2 ま (P) = リリ 
ガー ル ハ ント 7Z5 


文 遊び 万 

を た れ ぞ で れ の プレ イヤ ー は 。 コン ドロ ー ラ ー の エ と 昌 を それ ぞ れ 使い ます 。 

ゲー ム が 始ま る と, 画面 中 に アル ファ ベッ ト 26 文 字 と , @ マ ー ク が 1 つの 計 27 文 字 が 乱数 
で バラ ま か れ ます 。 その あと て で 画面 の 左右 の 端 に 各 プ レイ ヤー の シャ クト リ 選 表 示さ れ , 
す で 動 き 始め ます 。 

画面 の 下 に は 最初 の 名 前 が 表示 る れ ま す 。 左側 が プレ イヤ ー 1 (コン トロ ー ラ ー1) で , 右 
が プ ャ イヤ キー? 用 て す 。 

シャ クト リ 虫 の コン トロ ー ル は コン トロ ー ラ ー の 十字 ボタ ン で 行ない ます 。 ボ タン を 押し 
た 方 に シャ クト リ 中 が 進ん で 行き , 何 か 文 字 に ぶつ か る と , それ を 拾っ て , その 文字 が 画面 
下 の 名 前 下 に 表示 る れ ま す 。 

画面 の 上 下 と 左右 は 続い て いて , 右 に 向っ て 進ん で い 《 と , 左 か ら 出 て きま す 。 


文 ブ ログ ラム の 説明 


念 初期 設定 (110 一 270) 

配列 の 宣言 や , 名 前 の デー タ 読 み 込み , 変数 の 初期 化 を 行ない し, アル ファ ベッ ト を 乱数 を 
使っ て バラ まき ます 。130 行 の デー タ 文 を 変更 し て , た と えば 名 前 の 代わ り に 英語 の 単語 に で 
も し て お く 〈《 と , 遊ん で いて も 勉強 し て いる よう に 見 えま す 。 

@ メ イン ルー プ (500 一 750) 

大 き な FOR 一 NEXT 文 で , 各 プ レイ ヤー の 処理 を 順に 行ない ます 。 ど ちら の プレ イヤ ー の 
処理 を し て いる か は FOR 文 の 制御 変数 で ある P で 表 わ る れ ま す 。P が 0 の と き は プレ イヤ 
ー1, P が 1 の 時 は プレ イヤ ー 2 の 処理 で す 。 

メイ ン ル ー プ は 大 きい の で 分 け て 説明 し ます 。 

510-550 行 が コン トロ ー ラ ー か ら の 入力 チェ ッ ク で , 移動 先 の 座標 を 計算 し ます 。HH(P) 
は シャ クタ トリ 申 の 進行 方 仙 で 、 1 が 右 。 2 左 。 4 下 。 8 上 E 上 な っ て いま す 。 コ ント ロー ラー 
の 十字 キー が 押さ る れ て いな けれ ば 前 回 まで の 進行 方 向 に し た が っ て 移動 し ます 。 

560 一 600 行 は 移動 先 に 何 が ある か の チェ ッ ク で す 。 何 $ も ない (スペース) 時 は を その まま 
移動 , 相手 の シャ クト リ 虫 で あれ ば 停止 , 何 か の 文字 な ら 6 以 下 の 処理 に 進み ます 。 

AA なら , 保存 用 の 文字 列 N 2 $(P) に を その 文字 を つけ 足し ます 。 これ で N 2 $ (P) が , 
N 1 $(P) 一 指示 る れ た 名 前 が 入っ て いる 一 と 同じ に な れ ば 1000 行 か ら の 処理 を 呼び 。 新 し 
い 名 前 を モッ ト し ます 。 

この 文字 は 画面 か ら 消 し て , すでに 新しい 場所 に 書き 直し ます 。 (650 一 670 行 ) 

N1$ が N2$ よ り 長 く 〈 な っ た 場合 は N2 $ を クリア し ます 。 
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740 の 

75 の 

1 9 の ⑦ の 
1 の 1 の 
1 の 2 の 
15 の の 
1510 の 
152 の 
2 の の 
2 の 1 の 
9 ら 67』 
2 の 2 の 
25 の の 
Z ら 1 0 
EXT』 


BUSUE2 の の の 

IFN1 も (P)=N2 ま (F) GUSUEB 1 0 の 

AmRND(2 日 ) 』 YmRND (2 の ) 

IFSCR 事 (XY) く > リロ OTO6S の 

LUCATEX。YgIFRTINT 人 NN も 

X=TX(P)IYETY(F) 

IFSCR ま ((X+1)MODSB。Y) =C ま (PF)THENTX(FP)=(X+1)MODSB 
IFSCR$((X+27) MOD28 。Y) =C も (F) THENTX(P) =(X+ キ 7) MOUD 


IFSCR ま (X 。(Y+21) MOUD22) = じ も (P)THENTY(F) =(Y+ ジ 1 ) DUD 
IFSCR も $(X 。(Y+1) MOD22) = じ 和 も (F)THENTY(P) =(Y+T1) MOD ジン 


LOCATEX 。YaPRINT" "』 
LUCATECX(P) 。CY(P) iPRINTC ま (P) 』gH(P) *B 
NEXT』 BOTD5 の の 

M(P) =M(P)-1』 ITFM(P) =BDTD1 5 の の 

N2b(P) = 』N1$ も (P) mNA$(RND (B) ) 

BUBUB2 の の 』 RETURN 

PLAY"C1EBDEF'"』CLG 

LHCATE7 。 呈 』PRINT "PLAYER" WP+18 リ 0 MIN !! リ 

END 

LUCATE-(Pm1 ) *14。22』PRINTN1(P)+ リ リョ 

LUCATE- (Fm1)*14。2 さ PRINTLEFT も (N2$(P)+ リ D 
リア トリ IM(P) ョ リー ニン リョ 

RETURN 

CX (P) msPx27CY(P)=1 の TX(P) CX(P) 』TY(P) mwCY(P) +2 
FOURI=CY(P)TDTY(P) 』LOCATECX(P) 。 TiPRINTC ま (P)』IN 
RETURN 


ガー ル ハ ント 7ZZ 


@ な ら ば N 2 $ の 右端 の 1 文字 を 消し ます 。 

680 一 740 行 が シャ クト リ 下 の 移動 で . まず 尾 を 消し ます 。 新しい 尾 の 座標 を し ら べ で て 
(690 一 720), その 座標 を TX(P), TY(P) に セット し ます 。 それから 前 に 計算 し て お いた だ 新 
し い 移 動 先 に 頭 を 書き ます 。 

@ 表 示 用 ルー チン (2000-2020) 
画面 の 下 に 名 前 の 文字 列 , N 1 $(P) と N2 $(P) と 残り の 人 数 を 表示 する ルー チン で 


すす 
文 恋 数 表 
P プレ イ ヤー 識別 用 


CX(P), CY(P) シャ クト リ 虫 の 頭 の 座標 
TX(P), TY(P) シャ クト リ 虫 の 尾 の 座標 


H(P) シャ クト リ 虫 の 進行 方 向 
N 1 $(P) 2 

N2 $(P) 名 前 格納 用 

NA$(n) 単語 デー タ 

M(P) 残り 人 数 


ーー 
っ 
生生 委 
議 


ーー 


ーー 
. 貞 
敵 寺 
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コシ ピュー ター マニ アタ ア 性 『 約 ぐら 


コン ピュ ョ ー タ ーー マー ア つて どん な イス メー ジグ ガ こ いう た 人 F 休 的 に 「 根 阿 」 つ 
まり ,。 ね つ カ ら 此 いと いう 到 吾 返っ つて こる 。 

眼鏡 を ガ け て いて , ふと り ぎ み (〈 運 動 不 足 ), 色 は 青白 く (日 光 に あ だ つ て な 
い ), 身なり に みかみ ま わざ ず 髪 は ボサ ポ ボサ 。 指 に は ゲー ムダ コ が で き て いる 。 ご こう い 
う 人 は 少々 問題 だ ね 。 実は, 大 学生 や 高校 生 に こん な 人 が 多 い ん だ 。 

まさ ガ 君 は 違う だ ろう つね 。 

コノ ピコ ュー ツー を 箇 に し て し る ソラ ンー や オペレーター で さえ , 1 時 
間 に 10 分 が ら 20 分 は テレ ビ か ら 目 を 離し て 休ま な けれ ば いけ な いよ うに な つて 
き て る 。 コ ン ピ ュ ユー マー 自体 が 悪い ん で な こ て , 長 時 間 同じ 次 勢 で いた り , テ 
レビ を 見 て いる と , 目 や 体 に こつ て も 良 ぐ な い 事 が 医学 的 に は つき り し て いる 
ん だ 。 | 

や つば り 隊 の 下 で 選 い つき りあ ば れれ て ,。 コン ピュー ター で も 症 誠 に 遊ぶ 。 
それ が 一 番 だ 。 

デバ ッ グ や , プロ グラ ム 上 で 行き づま つ だ 時 , 体 を 動 が す 事 が 気分 転 拠 に な 
り 。 が ガ えつ て うま ぐ く 行 時 が ガ 多 い 。 

ゴン ピュー ツー し ガ 知 ら な いな ん て ,。 やつ ばり 「 根 了 略 」 と 彰 ば れ て も し よう 
の お し いね 。 マ ルナ 関 で 。 ス ポー ソ も て まる コン ピロ ユー ツー も 使え る つて い 
う の び が び ,。 やつ は し , ナウ し いん だ よ / 


ガー ル ハ ント /9 


の ケタ ノ プ スズ ウソ プ ラ イレ テ ゾ フク ク ク 主 


か す オ 。) グ レー グ 1 PE な ツク やじ や ポ スミ か 7 トド プ 。」 あ 衝 、 ひ と つ に な っ ちゃ 
2 ( ま 導 も っ 2642 の y ダダ や っ ぱり ひと つが だ な 。 どう も 5 し 7 は な きる そう だ か な 。 か 
ます も 。 5 と 』 、 うん ル 。 きた と 4 は あり そう が だ 。 4978 で どう だ 「。 
や っ だ , ハタ 2 本 だ 。 4 3 は まち が いな か ろう 。 あ と 使っ て いな い の は … と , 4 3 6 9。 
た デ 。 あ よ し な か の た に まま りす 0 か かな 、「 ピ 。 ビビ 。、 区 ゼ 」「 ま リサ テリ ラテ や っ 
だ , ハタ 4 本 。 7 回 目 か 。80 点 だ 。 ダ ブル を か けれ ば よかっ た か な 。 よし 次 だ 。 


婦 ゲ ー ム の 説明 

MOO は , ヒッ ト アデ ンド プロー と か , マス ター マイ ンド な ど と も 呼ば れる ポピュラー 
な ゲー ム で すか ら 6 知っ て いる 人 も 多い と 思い ます 。 本当 は 人 間 が 2 人 で や っ て 競い 合う も の 
で す が , 相手 が いな い 時 な ど コ ンピュータ 相手 に や る の も いい も の で す 。 人 間 相 手 ど と , た 
ま に (よく 〈《 ? ) ヒン ト を 間違え た りす る の で , か えっ て コン ピュ ー タ と や っ た 方 が いい の か 
も 5 し れ ま せん 。 特に, 何 回 や っ て も 当て られ な いと き の あ の 冷た い 視 線 に 苦し まな く て いい 
の で , 練習 用 に ちょ うど いい か も し れ ま せん 。 

ルー ル を 知ら な い 人 の だ め に , この プロ グラ ム で の ルー ル を 簡単 に 説明 し て お きま す 。 

まず , コン ピュ ー タ が 4 ケタ の 数 を 決め ます 。 この 数 字 を を コンピュー ター か ら 返 っ て くる ヒ 
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プロ グラ ムリ スト 


1 の 
1 1 の 
1 2 の 
1 3 の 
1 4 の 
15g 
1 6 の 
さ の の 
さ 10 の 
さ < の 
ささ の 
さ 4 加 
さら 0 の 
さら 6 の 
さ / の ⑦ 


DIM N(9) ,8(19) 
CLGg 

PALET B の 。47,4 日 。 さ 9。22 

FOR Is1 TO 1 の 

READ 8(1) 

NEXT 

DATA 1 の の,B の の , 5 の 。 さ の の 。 2 の の 。 1 の の 日 9,6 の 9 。 さ の 。1 の 
FOR TU=1 TO 5 

CLg 

FOR 1I=g TO 9』N(I)=ImNEXT 

Nm 

FDR Is=9 TO 6 BTEP -1 

RsRND (1+1 ) 

AN*=AN+HEX も (N(R) ) 

N(R) =N(1 ) 

NEXT 

LOCATE の 。 の 』PRINT "SCORE" ョ BC 

FOR T=1 TO 1 の 

LOCATE の 。』15』aPRINT "479 ノノ スウ ラー イ ル テ 1 リ 1 
ct: モ LU レル ザル 

LUCATE 17。』15PRINT 』 

K ま smTNKEY$ も (の) 

IF KCHR も (1 さ ) THEN Ds1』BDTU 62 の 

ITF KK ま = リ リ THEN PLAY "C1E"D=2IBHTOD 62 ロ 
IF ABC(K) く 4 日 DR ASC(K*) 57 BOTH 54 
=RTBHT ま ( 谷 和 +K 事 。 4 ) 

LOCATE 17。15』PRINT 

FOR Is ウ TO 3 さ gg』NEXT 
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ント を 使っ て 当て る わけ で す 。 こ の 4 ケタ の 数 は , 0 一 9 まで の 数 を 1 回 だ け 使 っ て 決め ら 
れ ま す 。 つ まり 2234 の よう に 同じ 数 が 重複 する 事 は な いわ け で す 。 

オン セ ュ ー タ ー の 入力 肢 示 に も た だ っ て 4 ナタ の 数 本 みお しま す 。 す る と ュ ユン ピュ ーー は 自 
分 が 決め だ 数 と , この 数 を 比較 し て , 次 の よう な ヒン ト を 返し ます 。 

@ 数 字 と ケタ が 合っ て いれ ば ,。 ハタ 

@ 数 字 は 合っ て いて , ケタ が 違え ば , リン ゴ 

だ と ん は ほ は.。 コ ンピュータ ダー が 半 ゆ だ 表 上 3 3 4 て で て. 入力 し た 数 池 が 1945 な 5。 1 は じ 
ッ タ リ 合 っ て いま す が , 3 と 4 は ケタ が ずれ て いま す 。 5 は 完全 に は ずれ で すか ら , 結局 ハ 
が 1 ユ 1 本 (1) と リッ ざる 2 枯 13 よ 4) 相 だ ドド ト た し て 返 き れ ま す 。 と の ヒッ トド ト を も と に し て , 
さら に 推理 し て 数 を 当て る わけ で す 。 

た だ し 無制限 に 入力 で き て は 面白 く あ り ま せん か ら , ひと つの 間 題 に 対し て 答え られ る の 
は 10 回 どけ に し ます 。 最初 は 大 変 か も し れ ま せん が , 慣れ て くる と だ いた だ い 8 回 以内 で 当て 
られ る よう に な り ま す 。 

あと , この プログ ラム で は 何 回 目 の 入 力 で 当たっ た か に よっ て 次 の よう な 得点 が も ら え ま 
本 

1 回 目 で 当たる と (これ を 偶然 と いう ) 1000 点 , 以下 , 800, 500, 300, 200, 100, 80, 
50, 30。10 点 と な っ て いま す 。 

る さらに 答え に 絶対 自信 が ある 時 は , “ダブ ル " が か けら れ ま す 。 これ で 当たれ ば 上 の 得点 の 
2 借 が も ら え ます 。 た だ し は ずれ る と , それ まで の 得点 は 0 に な っ て し まい ます 。 問題 は 5 
問 だ どき され ま すか ら , これ で 友人 と 点 を 競う の も いい で し ょ 2 う 。 


方 数 字 の 入力 の し か た 


婦 回 画面 や や 下 に 
が アー 人 瑞 攻 が / ダ ー オ リッ テ / キナ すす 5 
と 表示 る れ ま す 。 入力 は 数 字 以 外 に は 受け つけ ませ ん 。 1 文字 入力 する ご と に , 数 字 が ひと 
ケタ 左 に ずれ て いき , 5 文字 以上 入力 する と 左端 の 1 文字 が 消え て いき ます 。 
正しく 4 ケタ 入力 で きだ ら 6, RETURN キー を 押し ます 。 こ の 時 , ダブ ル を か ける と き は 
RETURN の 代わ り に スペ ー ス キー を 押し て くだ さい 。 


壇 プ ログ ラム の 説明 
念 初期 設定 (100 一 160) 

信 数 字 決 定 (330 一 380) 

人 き 解 答 入 力 (510 一 610) 
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61 の 
ら 6 と の 
ら 6 さ 功 
640 
65 
66 の 
ら 67 中 
6Bg 
670 の 
7 の の 
/10 
ノロ 
7 さき の 
7Z4 
75 の 
Z60 
77g 
78B 
7 
B の 
1 
2 
日 さ の 
B4g 
BS の 
6 の 
B7@ 
BB 
7 の 
9 の 


GUTO 54 の 

LUCATE 1 の TiFRINT 内 利 
LULAITE 92.19IFRINI 
H= の の 』 = の 

FUR Im1 | 4 

FOUR J=1 TO 4 

IF MITD ま (AN も 。T。1) く 2MTD 征 (人生 。。1) GOTO 7 の 9 
IF IT=J THEN H=H+1iGOTOU /00 
H= ロ +1 

NEXTNEXT 

HT 利 リア 

IF D=2 AND H<>24 THEN SC 
IF H=2 GOTOU 7?9 
FHR 】=1 IOU H 

HT も =HT も +C じ HR 和 (199) 
FLAT _ H ロ 1 

NEXT 

IF H=4 GOUSUB 1 の: GUTOU B4 の 
IF Bs GOUTOU B40 

FOUR ) ら 1 「O B 

HT も =HT ま +CHR ま (219) 

FLIV に E1 

NEXT 

LUCLATE 19.。「IFRTINI H「W 

IF Hs の AND Bs THEN PLAY "CS" 
NEXT 

LUCATE 9D。OuFPRINT "BCDRE !BC 
LUCATE 5。1 さ PRINT "ANSMERE TIRN$ も 』 
FRUBE 
NEXT 


4 ケタ の 数 字 の 入力 ルー チン で す 。 数字 は 文字 列 に し て A$ に セッ ト し て 返さ きれ ます 。 
@ ヒ ント 計算 (640 一 700) 

4 ケタ の 文字 列 を それぞれ 比較 し ます 。 人 間 だ と 間違い や すい 部 分 で す が …。 ハタ の 数 は H, 
リン ゴ の 数 は B に セッ ト さ れ ま す 。 
@ ヒ ント 出力 (710 一 850) 

入力 し た 数 字 の 横 に , ハタ と リン を 表示 し ます 。 
念 得点 , 解答 出力 (870 一 890) 

解 谷 を 出力 し た あと 入力 待ち に な り ま すか ら , 好き な キー を 押し て くだ さい 。 光 の 間 題 に 
つり ます 。 


文 変 数 表 


AN$ コン ピュ ー タ ー の 決め た 数 


A$ 入力 し た 数 

TU 問題 番号 

T 何 回 目 の 入力 か 

H ハタ の 数 

B リン ゴ の 数 

SC 得点 の Q ケ か ノ スウ ジ ラ イレ テッ フッ クタ 調 
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91 の 2 END 

1M20 FLAY 「D1ECEG" 
1 の 1 の SC=SC+G( 征 ) xD 
19Z の の 「=1 の RETURN 


入力 壮 浪 めい る る 

コン ピュ ユー ター が 人 間 の 命 久 を 受け 取る の に は どう いう つう 記法 が ある だ ろう 。 

ファ ミコ ン で は キー ボー ド を 作 つ て 命令 を 打ち 込め ゆい いね 。 ゲー ム を し て 
る 時 は コン トロ ロー ラー を 使う ね 。 こ の コノ トロ ロー ラー に も いろ いろ ある 。 シ ョ 
イス ティ ッ ン と いう の ば は,。 グー ムセン ツー の プー ム ん 科 胡 に つい て る や つと 同じ 
だ 。 ト ラッツ クボ ポール と 言 つ て , 丸い 大 き な 玉 を 手 で まわ す も の も ある 。 

パソ コン 用 だ と , デジ タイ ザー や マウ ス (トラ ッ ツク ポ ボー ル を 逆 向 け に し た も 
の と 思え ば いい ) な ん て も の が ある 。 最近 ワー プロ 用 に 「 手 書き 文字 認識 ボー 
ド 」 も 製 吊 化 さ れ だ 。 ポ ボード に 字 を 書 こ と , コン ピュ ユー ダー が それ を 読み 取 つ 
て これ る わけ だ 。 

ライ トペ ン も ある 。 テ レビ の 画面 を これ で 押す と , 画面 上 の どこ を 押し た か 
わか が る も の で 。 MS メメ で も 使え る 。 

ンー フー や 河 蔵 塵 に は 「 漏 度 セ ン サ ー」 自動 ドジ な ら 「 光 セン サー」 や 「 重 
時 ピン リー ガ つ し て し て 肖 民 や て 。 ル や 、 盾 お の 変化 を コン ピュ ー マ ター に 伝 
えて これ る ろ る 。 

コン ピュ コー ター と コン ピュ ユー ター を 結ぶ に は , 電話 を 使 つ だ 「 者 種 カ プラ 」 
や ,。 | 光 ノ フ ン イー」 を 使う つ 。 

で も 同 よ り の つこ いい の は コンピュー マー に 店 し か ける だ け で いし ! 背 声 胸 
問 」 法 だ 。 こ れ は 用 日 本 の 音 メ ー カ ー が ガ め 死 で 開発 し て いる けど ,。 ま だ まだ 
高価 な も の だ 。 そ うい うつ 意味 で は , 何 を 話し て いる ガ は 識別 で き な い けど , 声 が 
出 て いる か どう か を 判断 で きる ファ ニコン (コロ コントロー ラー II に マイ ク が つい 
て いて , Ver.3 で は それ を 使っ つっ を ゲー ム が ガ が できる) は, 時 代 の 最 先端 を 行く マ 
シン と も 世 え る れ / 


MOO 65 


REFRECT ION 


ぇ ーー と 。 ここ か ら 5 ボー ル を 投げ ば る と, この 豆 に ぶつ か っ て 。 こっ ち に いっ て あっ ち に いっ 
も の TA 。 ああ , わか ら な い 。 時 間 も な い か ら , 投げ て みる か 。 


ゲー ム ボ ー ド に は 壁 が いっ ぱい 。 この 中 に うま 《 ボ ー ル を 投げ 込ん で , ハタ に 命中 る せ て 
(だ る 選 。 でも, この 避 は ボー ル が ぶっ か る と , 向き が 変わ っ て し まう ん で す 。 す で 近 て (の 
ハタ な ら 当 て や すい けど , 壁 で 何 回 も は ね 返っ て か 6 ハタ に 当 だ っ た 方 が , 点数 が 高い ん で 
す 。 で も 考え て いる 間 に も 時 間 は 経過 し て , あま り 考 えす ぎる と 時 間切 れん で ゲー ム オ ー バ ー。 

さあ, 君 は ボー ル の 動き を 読み 切れ る か ! ? 
文 ゲ ー ム の 説明 

ゲー ム ボ ー ド の 周囲 の レー ル の 上 を , ボー ル を 動か し て 好き な 所 で 発射 し て 《 く だき さい 。 ボ 
ー ル は , そこ ら 中 で 壁 に ぶつ か りな が ら 6 飛び回り ます 。 そ の うち に うま く ハ タ に 当たれ ば , 
壁 に 当たっ た 回 数 X10 点 が 加算 る きれ ま す 。 ハタ を 全部 消す ほ 一 面 ク リア で , 長 の 数 が 少し 
増え て 次 の 面 に 進み ます 。 各 の 数 は 1 面 が 100 個 で , 20 個 ずつ 増え て いき , 7 面 で 100 個 に も 
どり ます 。 1 面 ク リア ご と に , 残り 時 間 が ボー ナス と し て 得点 に な り ま す 。 
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ブ プログ ラム ハリ スト (me 画面 テー ター は 103 ペ ー ジ ) 


1 の の DIN MM も ( さ ) 
194 CBBET1 

195 PALET B の 』47。4B』 さ さ 。4 昌 

196 PALET B 1。47。4 昌 。4 日 4 

197 PALET B 2,47。22。4 日 ,4B 

119 CLBICBEN さ 』VIEMIBPRITEDN 

14 り の FURI= の TU さ 』READ 日 iM も (1T) mwCHR も (8) 』NEXT 

159 DATA 237,2 さ 9 .。2 さ 3 ,24 

1 6 の DEFBPRITE 。 (2 4 の, の, の, の ) =CHR 和 も (2 の 7 ) 

さ の の ML= の gi SC= の LUCATE。13』PRINT "PUBH START BUTTON!" 
さ 1 の IFBTRIB( の ) く >1BHTDS10 

さく 2 の VIEM』 TM=6 の gi BXm14』BYm2』F= ロ 

ささ の FURIm1T ロ F 

34 の X=RND(26)+1』YmRND (19)+1 

35 の IFBCR 名 (X』Y) く >" "BODTU さ 4 の 

355 COLORX 』Y。2 

さ 6 の LUCATE X。Y』IPRINTCHR ま (199) 』NEXT 

362 FURIm1TO1+ML 

36 さ XmRND(26) +1』YmRND(19) +1 

さ 64 IFBDR も (X。Y) く > リ BOTU さ 6 さ 

365 LUDCATE X』Y』IPRINTM ま (RND(4) ) 』 NEXT 

さ 7 の BDSUB21 の の 9』BDSUB215 の 

ス B BUBUB229 の 9』LDCATE の 。21』PRINT "TIME "4TM/1 の 4 " 
5 の IFBTRIB( の ) =BBHTD1 の の の 

1 の SB=STICK( の ) 

2 X=BX+(Bm2) (Bm1 ) 』YmBY+(Bm 日 ) (Bs4 ) 

55 の IF X< の UR X>27 OR Y< BOTD 59 の 


REFRECTION 9@Z 


文 璧 の 種類 


①1 @②1T ⑳ 一 ④ 
の 4 種類 で , へ と だ は それ ぞ れ N と ノ の つも 0 で す 。② と ④ は ボー ル の 進行 方 向 を 90' 変え ま 
す 。 
① と ③ は , 倫 一 | の よう に ぶつ か っ た 時 は ボー ル の 進行 方 向 を 180' 変え ます ( 来 た 方 向 に 
戻る )。 
ボー ル が , 氏 一 っ み ビ コ の 向き に ぶつ か っ た 場合 は , ボー ル は その まま 直進 し ます 。 
ボー ル が 歴 に ぶつ か る と , 歴 は 必ず 左 ( 反 時 計 ま わり ) に 45*" 回 転 し ます 。 つ まり ① は ② 
に ,。②⑳② は ⑨③ に , は ④ に , ④ は ① に な る わけ で す 。 
文 遊び 万 
プロ グラ ム を 走ら せる と , 
PUSH START BUTTON / 
と 表示 る れ ま すか ら , コン トロ ー ラ ー 1 の スタ ー ト ボタ ン を 押し て くだ さい 。 ゲ ー ム が 始ま 
る と , 画面 左下 に 残り 時 間 と 得点 が 表示 る れ ま す 。 
コン トロ ー ラ ー の 十字 ボタ ン で ボー ル の 発射 位置 を 決め ,、 A ボタ ン で 発射 し ます 。 ボ ー ル 
が 発射 され ,、 ゲー ム ボ ー ド の 中 を 動き まわ っ て いる 間 は 時 間 は 減り 9 ませ ん 。 


文 ブ ログ ラム の 説明 


ボー ル の 発射 位置 を 決め る (500 一 600) 

コン トロ ー ラ ー か ら の キー 入力 を 調べ で, それ に し だ が っ て ボー ル を 移動 きせ ます 。A ボタ 
ン が 押 き る れ た だ ら , 1000 行 に 飛び ます 。 
@$ ボ ー ル 発射 (1000 一 1050) 

ボー ル の 進行 方 向 (0 - 3 ) を 決め , 変数 HH に セッ ト し ます 。 
ボー ル 移 動 と 衝突 (1060 一 1220) 

ボー ル を 進行 方 向 に 1 ブロ ッ ク 進 め 、 何 に ぶつ か っ た か を 調べ ます 。 ぶ つか っ た だ 物 の コー 
ド を 変数 1 に セッ ト し て 各 処 理 を 行ない ます 。 

ミーー ド は 的 の と 替り て す 。 

32 : 何 も な い 

199 : ハタ 
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呈 6 の 9 IT=ABC(BCR ま (X 。Y) ) 

7 の 9 IFI く <2220R TI>227G0TO ロ 59 の 

5B SBX=X』BY=Y』BOUBUB22 の の 

、 59 の TM=TM-1』 TFTM く 1THENVIEM』 BHTO175 の 


6 の LOCATE ウ の,21』PRINTVTTIME" ITM/1 の 』" 


1 の の の 
1 の 1 の 
1 の Z の 
1 の 30 の 
1 の 4 の 
1 0 の 5 の 
1 の 6 
1 の B の 
1 の 9 の 
1 の 795 
1 1 の の 
ょ 1 1 の 
1 1 2 の 
1 1 3 の 
114 の 
1160 
117 の 
119 の 
1 2 の の 
121 の 
1 2 の 
15 の の 
1510 の 
1 6 の の 
1 65 ら の 
1 66 


IF TI く 226G0TOUS90 の 
IFSX=2THENH=1 BUTOU1 の 5 の 
IFSX=27THENH= さ 』 GOUTOU1 0 の 
IFSY=gTHENH=2s GUTO1 5 の 
IFSY=Z の THENH= の GOUTOU10S の 
=GXI YEBY』 Cm の 


8BX=BX+(H= さ ) (Hm1 ) 』 BYmSY+ (Hm の) (HH=2) 1 GOUSUB2200 の 


1=ABC (BCR$(8X 。BY) ) 
ITF Im= さ 2GUTO1 の 6 の 

C=C+ 1 

IFIm199BUTD16 の の 

IF I=226DRTm227GBUTH166 の 

DNI-2 さ 6BOTD1 1 さ の 。 116 の 9』119 の 9。121 の 


Ks の s IF H MOD2= の THENH=(H+2) MOD4』 GOTO1S ウ の 


BOTOU15 の 0 


Km2nIF H MOD2=1THENH=(H+2) MOD4』 GOTO1S の 0 の 


BUTOU15 の の 
K=1』IF H MOUD2= ウ THENH=H+ 1 』 BUTOU130 の 
H=H-1』 GUTOU1500 の 


K= さ 』 IF H MOD2mOTHEN Hm(H+ さ ) MOD41BUTU1590 の 


H=(H+1) MOD4: GUTO1S の の 
FLAYYCOV IKE (KK+1) MOD4 

LOUCRTE SBX。SYsFRINTM ま (KK) BUTOU19609 
SC=5C+CX1IFLAY"CODE" ョ F ト テ Fー1 


LOUCATE SX。SYsFRINT" "igGBOSUB210 の 3 IFF=2GOTO1 7 の の 


OX テニ X3SYEYIBUSUBZ ジ OO GOUTOUS の の 


"kBUTOS の の 


REFRECTION 6@9 


226, 227 : 周囲 の レー ル 

237 一 240 : 硬 

壁 に ぶつ か っ た 時 の 処理 は 1120 一 1220 行 で , ここ で ボー ル の 新しい 進行 方 向 を 決め , ぶつ 
か っ だ 回 数 (変数 じ C) を 1 増やし , 壁 を 回 転 き せま す (1500 行 )。 


以上 が 中 心 と な る 部 分 で , この 他 に は , 

ハタ クリ ア (1600), 1 面 ク リア (1700), ゲー ム オ ー バ ー (1750), ボー ル 表 示 (2200) な 
と が お あり ます 。 

初期 設定 は , 100ー380 行 で ,。 ハタ の セッ ト は 330 一 360, 壁 の モッ ト は 362-365 行 で 。 それ 
ぞ れ 表示 位置 は 乱数 で 決め て いま す 。 

BG 画面 の ゲー ター を 変え る と , ゲー ム ボ ー ド の 形 を 好き な 形 に する こと が で きま す が , こ 
の 変更 あす る 時 は , ハタ と 壁 の 座標 に 気 を つけ て くだ さい 。 

ハタ の 数 を 変え たい 人 は , 320 行 の F= 5 を , 制限 時 間 を 変え た た い 人 は , 320 行 の TM=600 
を 好き な 値 に 変え て くだ さい 。 

壁 の 数 を 変 を た た い 人 は 362 行 の , 

FOR IT= 1 TO100+ WL 

の 100 を 好き な 値 に し て くだ さる い 。 多い 方 が 見 て て 楽し てく な り ま す が , 動き の 予想 は 難し 

を 定 外 ます 。 


文 変数 表 


SXX, SY ボー ル の 位置 


日 ボー ル の 進行 方 向 

ボー ル が 壁 に ぶつ か っ た 回 数 
ビ ハタ の 数 

TM 残り 時 間 

PX, PY ボー ル の スタ ー ト 位置 

SC ご | ア 

HS ハイ スコ ア 
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1 7 の 
1 72 の 
1 7 さ の 
1750 
176 
1 77 の 
17B 
<150 
18 の の 
<1 の の 
<15 ら の 
ZZ の の 


UIEMILHUATES SLPRKINTTMIGSION CUHMPLETED) !) 
SC=SC+1 の の +TM/ 1 GHSUB2 1 の 

ML= (ML+T22)MOD1 ウ の IFURIFMTUD99iNEXT GUTUSEO 
LUDCATE1.。7uPFRINT BAME UVER' 「 
LHCATE2 BaFRINT YUUR BUORE 19 150」 FUINISGT 
IFSGC く =HS GOUTO1B 


LUCATEB 2IPRINT IT BB HI-BUOURE !) IOPSCIHUSUB 


LUCATE19』11』PRINT"TRY ABAIN!"』BDTH さ の 
LOCATEg 22』PRINT "SPORE"』BCIRETURN 
LUCATE1 さ 』21』PRINT"H1-BPORE"』HBIRETURN 
GPRITE の ,。GXxB+16,BYx 昌 +24』RETURN 


REFRECTION 91 


LE 


Ver.2 て は , CAME BASIC に し た だ あと, 「2 一 BG GRAPHI 
C」 を 選ん で くだ さい 。 すでに, BASIC 画面 に し て いる 場合 は ダイ レク ト 
YSI 呈 有 M 
と する と , 選択 モー ド に な る の で , 「 2 」 の キー を 押し ます 。 (ブロ グラ ム は 
消え な い の て で 安心 し て くだ さき さい) 
Ver.3 で は , 電源 ON の あと , ダイ レク ト で, 
BGTOOL 
と し て だ きい 。 
BG 画 面 の 書き 込み モー ド に な り ま す 。 (写真 ) 
カー ソル キー で カー ソル を 移動 し ます 。 カ ー ソ ル の 座標 は 左下 に X, Y 座 標 
で 表示 され て いま す 。 リ ター ン キ ー を 押す と カラ ー が 変り ます (9 っ つ 1 一 2 
3 っ 7 が) 右 下 に 8 つ な ら ん だ キャ ラク ター を キャ ラク ター セッ ト と 言い 。 これ 
は 図 一 1 の 柄 一 列 に あ だ た だり ます (開始 画面 で は A 列 が 表示 ) CLR・HOME 
キー を 押す と , A つ B つ CM と 表示 列 が 変わ り ま す 。SHIFT キ ー と 
CLR・HOME キ ー を いっ し ょ に 押す と , M つ L 一 KK--->A と 逆 に 変り ま 
の 
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信 図 1 
BG グ ラフ ィ ッ ク 較 
キャ ラク ター | ^ 本 議 


「 DE 上 上 」 キ ー を 押す と セレ クト カー ソル が 右 へ 。 「INS」 キ ー を 押す と 
左 へ 移動 し ます 。 

以上 の キー を 使い 目的 の 場所 と 色 と キ ャ ラク ター を 選び スペ ー ス キー を 押す 
と , その キャ ラク ター が SET さ る され ます 。 

間 司 を だ キャ ラク ター を 消す に は , カー ソル キー を を その キャ ラク ター の 上 に 
持っ て いき 文字 キー の 「D」 を 押す と 消え を ます 。 

B G 画 面 デ ゲー タ は 「E 5 9」 の よう に 3 文字 で に な っ て いま す 。 これ は 。 キ 
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ャ ラク ター 表 ( 図 - 1) の 「E」 列 の ナン パー「5」 ( 諾 か ら 6 番 目 ) の キャ 
ラク ター で , カテ ラー は 「 が 」 と いう 意味 で す 。 
BC グラ フィ ッ ク の 書き 込み が 終る と テー プ へ ヘ へ SAVE し ます 。ESC キ ー 
を 押す と 画面 左上 に いく つも の 廊 字 が 出 て き て , その 左 に 「>」 マ ー ク が 点 減 
し ます 。 カー ザル 年 ーー も う 、 マ テー ナダ 「 PITLE」 の と ころ へ あわ せ て 
スペース キー な 埋まる ます 
LOAD か SAVE か 聞い て きま すか ら 「S」 キ ー で 押す と ファ イル ネー ム 
を 聞い て きま す 。 1 6 文字 以内 で ファ イル ネー ム を 入力 後 RETURN キ ー を 
押す と SAVE が 始ま り ま す 。 
この BG 画 面 の グー ター の あと に プロ グラ ム を SAVE す る と , LOAD の 
時 便利 に な り ま す 。 
Ver.3 で は , BASIC 画 面 上 か ら 6 BG 画 面 を 呼び 出 き な く て も 直接 に BG 
画面 グ ゲー タ を LOAD, SAVE で きる よう に な り ま し た 。 
し 人 たり ニテ の オト 9 
肖 あこ たま まま ル 才 - 
と いう 命令 を 使い ます 。 
まだ 。 キネ の ポト て 
BGGET 
と 入力 する と BG 画 面 の ゲー ター が プロ グラ ム 領 域 に 転送 きれ る の で , この あ 
ほっ 
人 AVY 到 -- グ ァ イ エ ル 者 
と する と , ブロ グラ ム と BG 画 面 デ ゲーター を 一 度 に テー プ に SAVE で きま す 。 
この チー を 人 え ロ そ る に は 。 
し 人 りあ 科 : 錠 デオ Me 名 
BB ば は PUT 
と し ます 。 こ の 「BGCPUT」 は , ブロ グラ ム 上 に ある BG 画 面 デ ゲー タ を BG 
画面 に 転送 する 命令 で す 。 
な お , この 方 法 は ゲロ グラ ム が あま り 長 すぎ る と , 
7OM ERROR 
に な り ま す (この 本 に 入っ て いる プロ グラ ム は 大 丈夫 で す 。) 
この BC 画面 の 入力 に は , 「COPY」 や 「MOVE」 な どの 便利 な 入力 法 
が あり ます 。「 フ ァ ミ リー・ ベ ベー シック ・ ホ ッ プ 編 」 に くわ し い 操 作法 が 説明 る 
れ て いる の で , 参考 に し て 《 だ る きい 。 
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プロ グラ ム が 
動か な い 時 は る ? 


プロ グラ ハム を ちゃ ん こと 打ち 込ん だ は ず な の に 動作 ガ お か が し い , エラ ー・ メ ツ セ ー ジ が 出 て 
止 つ て し まう こと が あり ます 。 ご これ は , プロ グラ ム の 間違い で な い 限 り 入 力 ミ ス で す 。 

SN, TM, 昔 エ ラー は 入力 の ツタ イプ ミ ス で す 。 そ の 行 に 打ち 間違い が な い ガ 人 確 ガ め て ぐ 
だ さい 。 (1 し エラ ー の 一 部 も ) 

NF, RG, OD, UL, DD, MO, UF(Ver.3) の エラ ー は , 入力 し な けれ ば いけ 
な い 症 令 や 行 や オペ ラン ド (LOCATE , の の よう お 病 令 の 「, のり 」 に あ だ る 部 分 ) 
を 打ち 抱 れ て いる ガ , 逆 に 同じ 命令 を だ ぶつ て 2 回 入力 し て いる 時 に 起こ り ま す 。 

| L, OV, OM, SD, DZ エ ラー は , どこ か で 変数 の 値 が 予定 外 に な つて いる 事 が 多 
ぐ , 「 や POV ERROR _ IN 259」 と 出 て も , その 原因 は , その 行 以前 に ある 場合 ガ 多 
い の で す 。 だ と え , 

1 の A= テ 1 の 

の りり ピロ = テ A*A 
と いう プロ グラ ム の 19 行 を 「A= 1 びり のり 」 と 打ち 間違う と , エラ ー は 20 行 で 発生 し ます 。 
エラ ー は 出 な いけ ご お か し な お 動き を する 場合 も , どこ か で 変数 の 値 が おお ひし こなつ て いる 

(偶然 エラ ー の 出 な い 程 度 の ) こと が 多い よう で す 。 

エラ ー を 出し た 変数 , お ひし な 動き を する 原因 の 変数 を つき こめ て , その 変数 が ガ 出 て くる 
行 を 全部 確 ひ すめ て くだ さい 。Ver.3 で は , プロ グラ ム 中 の 文字 列 を 探す 命令 が ある の で 便利 
で す 。 

FIND  “A" 
と する と プロ グラ ム 中 で 「A」 と いう 文字 が ある 行 を 全部 表示 し て ぐれ ます 。 

この よう に , プロ グラ ム の 誤り や 入力 ミス を 「 パ バグ 」 こ と 呼び , それ を 訂正 する こと を 「 デ 
パッ グ 」 と 呼び ます 。「 ファ ミリ ー・ ベ ー シ ッ ク ・ ジ ャ ンプ 編 」 で は この 「 デ バツ ゲ グ 」 の 方 
法 を くわ し ごく 説明 し て いま す 。 


上 エル 
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ソフ ト 集 - 


ファ ミコ ン だ けが , ゲー ム 機 じ や な い ! BASIC ガ 走る の も , ファ ミコ ン だ け じ ゃ な い 
1 プロ グラ ム を 作る 楽し さ , 自分 で 作る ゲー ム で 遊ぶ 楽し さ は , ファ ミコ ン の 数 倍 な ん 
て も の じゃ な い ぞ !! で も , BASIC で どの よう に プロ プラ ム し だ らい い の ガ 分 びら な い 
君 に , 初歩 の ラジ オ の 革 者 の 高木 春花 を は じ め NATS の メン バー が , だ ぐさ ん の プロ グ 
フ ム を 提供 し ます よ !! 

で は , MSX ソフ ト 集 の バー ト 1 ガ がら, ソフ ト の 内 容 を 給 介 し まし よう 。 


に は , ソフ ト 10 本 を 
掲載 し て いま す 。 


1 アレック グ バ すし ホー ネス ゲー グマ マー 

3。 スー パー バックアップ 4 コン ピュ レコ ー ダ ー 
5,。 スー クー メイ ズ 6。 ハオ パー チェ イサ ザー 

7. カセ モット ファ イル ズ 8. バラ ン 9. 15 ゲ ー ム 
O、 る も で も だ だ きま そ 学 。 

1, 9。 10 は , TV ゲー ム な ど で 君 達 も よ 《 知 っ て いる よね 。 
2。 3, 4。 7 は , 実用 レフ ト と も 言え る 物 な ん だ けど , 3 は 自分 の 作っ た プ 
ログ ラム や 友達 の ソフ ト を 借り た と き , 1 本 の テー に 何 本 も の プロ グラ ム が 記録 し て あ 
る と き な ん か に 簡単 に コピ ー し ちゃ お うと いう も の 。 4 は , MSX の CMT の LOAD 端子 
か ら 音 を メモ リー に 記録 し て 再生 し ちゃ うと いう も の な ど な ど , 盛り だ くさ る ん 。 


で は , プロ グラ ム を 7 本 掲載 し て いま す 。 


1 た まえ の 文字 当て ゲー ム 2. フラ イン グ ・ ス ポッ ト 3. スロ ー コ マン ド 4. スプ ラ 
イト ヘル パー 5. Combot 199X 6. MSX で アニ メー ショ ン 
ゲー ム は 1,。 5 で 。 SCREEN 1 の テキ スト モー ド で グラ フィ ッ ク を や っ ちゃ お うと いう 


も の 。 な ぜ か , グラ フィ ッ ク モ ー ド で 作っ た ゲー ム よ り 高 
速 で す よ 。 2 は リア ル タ イ ム CGC を する だ た め の ユ ー テ ィ リ 
ティ ソフ ト 。 3 は プリ ンタ ー を 持っ て いな い 人 が ,。 プロ 
グラ ム の デバ ッ グ を する と き に ,。 LIST を ゆっ くり と 表 

示す る た め の ソ フト 。 4 は MSX の 弱点 で ある スプ ラ 8 
イト を, 4 つ 以 上 表示 し ちゃ うと いう スゴ イソ フト 。 
6 で は ,。 MSX で アニ メー ショ ン を 作る に は どう し 
だ ら よ いい のか を , サン プル ブログ ラム と 解説 を し て 


@P も 。⑧ 


で は , ソフ ト 5 本 こ 少 な いで す が , 
中 身 の 濃い ソフ ト ば か り 。 


1. Wolf BOY 2. SCEIN 一 EDIT 

3 リモート ボン バー 4. コン ピュ ・ キ ー マ ヤー 
の MSA アニメ ー ジ ョ ンタ 

ゲー ム は この な か の 1 と 3 の 2 本 。 2 は パー ト 2 の Com 
bot と 今回 の Wolf BOY, リ モー ト ボン バー の 画面 を 
作る だ め の エ ディ ター で ,。 4 は , アマ チュ ア 無 線 と M 
SX の ドッ キン グ 。 自分 の 押し た キー が すぐ に モー 
ルス 符号 に な っ ちゃ うと いう ソフ ト 。 5 で は 前 回 に 
引き 続き MSX で アニ メー ショ ン を や ら せ る た だ め 
の テク ニッ ク 大 公開 1 


@PW。 


で は プロ グラ ム を 作っ た けど , も う 少 し 早く ならない か な , な ん て 思っ て いる 
9 方 に テク ニッ ク 公 開 や . いま は や り の RPC (ロー ルプ レイ ング ゲー ム ) 
を 作っ ちゃ っ た ぞ 。 な ど な ど プロ グラ ム は も り だ くさ きん 。 5 月 下旬 に 発売 子 定 
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ゲー ムン ソフト は 何 本 持っ て いま すか 


( 
人 @ 市 販 の ソフ ト の 価格 は 高い で すか , 安い で すか 
( 高い 
いく ら ぐ らい が 適当 だ と 思い ます か 
( 
@ あ な た の 欲し い パ ソコ ン は 何で すか 


( 


ゲー ム ソ フ ト ⑥O 発売 予定 | 


「 ファ ミコ ン ソ フト 集 O001」 に 掲載 の ゲー ハム ソフ ト を 一 本 の | 
テー ブ に , すべ て 集録 し まし だ 。 


予定 価 検 計 中 | 
信子 約 御 希 望 の 方 は 〇 E 印 を お つけ くだ さい 。 | 


YY この ハガキ の アン ケー ト に 答え て いた だ いた 方 々 の 
中 か ら 抽 選 で 20 名 様 に 発売 予定 の ゲー ム ソ フ ト ( カ 
机 トド デー アブ) 作 プ レザ ゼ ャ ト し ます 。 

@ 申 し 込み 締切 り 日 昭和 60 年 7 月 7 日 (消印 有効 ) 


デデデ ミ ラル に つい や て 。 稚 か らき いこ と 。 基き か な いと と きど 参 
お 書き くだ さい 。 
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親和 円 案 内 


還 ご 注文 は 、 な る べく お 近く の 書店 に お 願い いた し ます 。 

mm 直接 小 社 に ご 注文 の 場合 は 、 著 者 名 ・ 書 名 ・ 冊 数 お よび 住所 氏名 を 
明記 の うえ 、 代 金 に 送料 3 0 0 円 を 加え て お 送り くだ さい 。 

箇 現 品 が お 手元 に 届く まで 時 間 が か か る こと が あり ます の で 、 あ ら か 
じ め ご 了承 くだ さい 。 

m ご 送金 の 際 は 、「 振 替 口 座 東京 7-6294 番 」、 ま た は 現金 書留 を ご 利用 
くだ さい 。 定価 は 、'85 年 4 月 現在 の も の で す 。 

m 詳細 ご 希望 の 方 は 、 図 書 目録 (64.8) を ご 請求 くだ さい 。 
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<No. の の お も な 内 容 > 

@ 楽 し い ジ ュ エ リー の 展覧 会 @ る R. コ ペッ キー の ユー モラ ス な イラ ス 
トレ ーション @ デジ タル ・ ア ー キ テク チュ ア は 可能 か @ 村上 基 浩 氏 の 
侵 ! 作 プロ セス 公開 @J. フ ォ リ ス “ 石 "の コレ クシ ョ ン @ スタ ジオ 紹介 
' 奇数 月 10 日 発売 ・A4 変 ・96 ペ ー ジ ・1000 円 


<No.4 の お も な 内 容 > 

@ 大 イラ スト レー ショ ン 航 海 時 代 @ チェ ッ カ ー ズ 現象 の 秘密 @ 楽 しい 

広告 の お 勉強 @ 糸井 重里 の 500 行 @What's ナ イト タイ ム ス @ コ ピー 

ライ ター へ の 道 サン トリ ー 変 調 @ 松田 聖子 の 大 変身 @ 人 生 相 談 ほ か 
1・4・7・10 月 の 毎 1 日 発売 ・A4 変 ・128 ペ ー ジ ・ 定 価 680 円 


マイ コン 


を イン ター フェ イス の 技術 情報 誌 N2 好評 発売 中 . ノ 
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<No の お も な 内 容 > 

@e 特 集 ・ コ ンピュータ の デー タ 通 信 @ アセ ンプ ブラ 、BASIC プ ログ ラ 
マ の た め の C こ 言語 入門 @ 各社 最新 デバ イス ・ フ ァイル @DMA 転 送 方 
式 高速 ん /D コ ン バ ー タ w ぁ wDR 社 コン カレ ント DOS286 を 発表 
1・4・7・10 月 の 毎 18 日 発売 ・B5・136 ペー ジ ・ 定 価 650 円 
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